equal
deleted
inserted
replaced
|
1 "{ Encoding: utf8 }" |
|
2 |
1 " |
3 " |
2 COPYRIGHT (c) 1994 by Claus Gittinger |
4 COPYRIGHT (c) 1994 by Claus Gittinger |
3 All Rights Reserved |
5 All Rights Reserved |
4 |
6 |
5 This software is furnished under a license and may be used |
7 This software is furnished under a license and may be used |
192 (m := self asExecutableMethod) notNil ifTrue:[^ m literalsDetect:aBlock ifNone:exceptionalValue]. |
194 (m := self asExecutableMethod) notNil ifTrue:[^ m literalsDetect:aBlock ifNone:exceptionalValue]. |
193 ^ exceptionalValue value |
195 ^ exceptionalValue value |
194 ! |
196 ! |
195 |
197 |
196 messagesSent |
198 messagesSent |
197 "cannot ask a lazyMethod for messagesSent ..." |
199 "cannot ask a lazyMethod for messagesSent... |
|
200 Try to autoload, then ask that method." |
198 |
201 |
199 |m| |
202 |m| |
200 |
203 |
201 (m := self asExecutableMethod) notNil ifTrue:[^ m messagesSent]. |
204 (m := self asExecutableMethod) notNil ifTrue:[^ m messagesSent]. |
202 ^ #() |
205 ^ #() |