This fixes it.
It seems the last 2 literals in each method are selector and
classbinding.
So now I will try to submit it as a pharo-process-compatible patch too
(I should learn someday anyway... :-)
----
CompiledMethod>>refersToLiteral: aLiteral
"Answer true if any literal in this method is literal, even if
embedded in array structure or within its pragmas."
"only iterate to numLiterals - 1 , as the last has the classBinding
and method selector"
2
to: self numLiterals - 1
do:
[ :index |
| literal |
literal := self objectAt: index.
literal == aLiteral ifTrue: [ ^ true ].
(literal refersToLiteral: aLiteral) ifTrue: [ ^ true ]
].
^ false
On 07 Oct 2009, at 12:17, Stéphane Ducasse wrote:
> does anyone want to fix
>
> SystemNavigationTest>>testIsUnsentMessage
>
>
>
> Stef
>
> _______________________________________________
> Pharo-project mailing list
> [email protected]
> http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project
----------------------------
Johan Brichau
[email protected]
_______________________________________________
Pharo-project mailing list
[email protected]
http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project
