On Wed, Mar 10, 2010 at 1:12 PM, Stéphane Ducasse <[email protected]
> wrote:

>
>
> freeNamesAndValues
>        | aStream eval |
>        eval :=
>        [ :string |
>        self class evaluatorClass new
>                evaluate2: string readStream
>                in: self
>                to: nil
>                notifying: nil
>                ifFail:
>                        [ "fix this"
>                        self error: 'bug' ]
>                logged: false ].
>        aStream := '' writeStream.
>        self freeNames doWithIndex:
>                [ :name :index |
>                aStream
>                        nextPutAll: name;
>                        nextPut: $:;
>                        space;
>                        tab.
>                (eval value: name) printOn: aStream.
>                aStream cr ].
>        ^ aStream contents
>
> apparently
>
> freeNames
>
>        ^ self methodNode freeNames
>
> freeNames is not defined on compiledMethod
>
> Elliot do you have that in your image?
>

Nope.  Never heard of it.


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

Reply via email to