SUnit?

Markus Gaelli gaelli at emergent.de
Fri Oct 28 13:19:54 UTC 2005


Hi,

nice.
Works for me (not the coverage though)  -
after I extended Object with the following:

labelForSelector: aSymbol
     |read words currentWord capitalizedWord|
     words _ WriteStream on: String new.
     read _ ReadStream on: aSymbol.
     [read atEnd] whileFalse:
         [currentWord _ WriteStream on: String new.
         currentWord nextPut: read next.
         [|x| x _ read peek. x isNil or: [x isUppercase]] whileFalse:
             [currentWord nextPut: read next].
         capitalizedWord _ currentWord contents capitalized.
             (#(Of In At A Or To By) includes: capitalizedWord)
                 ifTrue: [capitalizedWord _ capitalizedWord  
asLowercase].
         words nextPutAll: capitalizedWord.
         words nextPutAll: ' '].
     words skip: -1.
     ^ words contents

Some class extension in seaside I suppose.
Or did I miss something?

Cheers,

Markus

Or was it moved recently to some
On Oct 28, 2005, at 3:04 PM, Lukas Renggli wrote:

>> It should run in Squeak 3.7 and later, with the Refactoring Browser
>> and the latest ToolBuilder loaded. There are certainly bugs. I built
>> that tool out of frustration of the existing tools that do not scale
>> to a large number of tests ...
>>
>
> Ohh, and a screen-shot is available at:
>
> http://mc.lukas-renggli.ch/essential/screenshot.png
>
> --
> Lukas Renggli
> http://www.lukas-renggli.ch
>
>




More information about the Squeak-dev mailing list