Er that looks more like the question is this a closure based image or not. If so you'll get burned when the first Squeak image comes out that is fully closure aware. Off hand I don't know exactly how you tell if it's a closure based VM, no doubt someone will pipe up. On 26-Aug-09, at 2:33 PM, Janko Mivšek wrote:
Stéphane Ducasse pravi:
Well, I needed to add some 'isPharo ifTrue:' sentences already.
Can you give us some examples why you need that?
For the stack contexts, see this "climbing on the stack" method:
Object>>firstRequestFromStack
"try to find a first sender up in calling stack, who is AIDASite and get request of that call" "Squeak specific! "
| stContext isBlock | stContext := thisContext. [stContext notNil] whileTrue: [ isBlock := AIDASite onPharo ifTrue: *[stContext outerContext notNil]* ifFalse: *[stContext isBlock]*. (isBlock not and: [(stContext receiver isKindOf: AIDASite) and: [(stContext at: 2) isKindOf: HTTPRequest]]) ifTrue: [^stContext at: 2]. stContext := stContext sender].
_______________________________________________ Pharo-project mailing list Pharo-project@lists.gforge.inria.fr http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project
-- = = = ======================================================================== John M. McIntosh <johnmci@smalltalkconsulting.com> Twitter: squeaker68882 Corporate Smalltalk Consulting Ltd. http://www.smalltalkconsulting.com = = = ========================================================================