The refactoring browser has this:

genericPatternForSelector: aSymbol
        ^ String streamContents: [ :stream |
                aSymbol keywords keysAndValuesDo: [ :index :value |
                        stream space; nextPutAll: value.
                        aSymbol last = $:
                                ifTrue: [ stream space; nextPutAll: 'arg'; 
print: index ] ] ]

Lukas

On Sun, Mar 1, 2009 at 7:18 PM, Stéphane Ducasse
<[email protected]> wrote:
> Hi
>
> does one of you get to know a method for doing that?
>
> #foo:bar:
>
>        ->  foo: arg1 bar: arg2
>
> Stef
>
> _______________________________________________
> Pharo-project mailing list
> [email protected]
> http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project
>



-- 
Lukas Renggli
http://www.lukas-renggli.ch

_______________________________________________
Pharo-project mailing list
[email protected]
http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project

Reply via email to