May 2011 - Pharo-dev - lists.pharo.org

[Pharo-project] How turn on Halo's?
by Denis Kudriashov Dec. 14, 2011

Dec. 14, 2011

Hello Can I turn on halos. And is rotating morphs supported in pharo?

8 12

[Pharo-project] OSS sound plugin.
by Lemuus Dec. 14, 2011

Dec. 14, 2011

Hi, is it possible to include the vm-sound-OSS sound plugin in the cog build on Hudson?. This is the only plugin that seems to work on linux. Thanks. Daniel Galdames G.

4 5

[Pharo-project] Send a notification
by Alexandre Bergel Dec. 2, 2011

Dec. 2, 2011

Hi! Together with Ivan we have been looking for an easy way to send notifications. We first thought about sending email directly from Pharo, but apparently it is not easy to send email. Anyone has experience with this? We then thought about emitting twitts, but there is a need to authorize the client. Anyone has experience? Maybe producing a RSS could do the thing? Cheers, Alexandre -- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: Alexandre Bergel http://www.bergel.eu ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.

5 7

[Pharo-project] about events :)
by StÃ©phane Ducasse Dec. 2, 2011

Dec. 2, 2011

hi may be I'm wrong but I have the impression that we have around three different kinds of event system in the system - actionMap - announcement - changed: Could we simplify that? Stef

7 10

[Pharo-project] Unsubscribing for Announcements
by Sean P. DeNigris Nov. 18, 2011

Nov. 18, 2011

I really like Announcements! It's so much easier to update complex GUIs when you can pass state :) I hit one glitch when unsubscribing... The CollaborActive book suggests unsubscribing in #delete. For complex UIs, this doesn't seem to work because #delete is only called for the one morph that was deleted, not for its submorphs (which may need to unsubscribe). I tried this: MyMorph>>delete super delete. "Must come first. Deleting a submorph before self = emergency evaluator" aSubmorphThatNeedsToUnsubscribe delete. SubmorphMentionedAbove>>delete self inventory announcer unsubscribe: self. super delete. But it seems like a lot of work and coupling. Is there no hook that is guaranteed to be called when a morph is going away - i.e. it or a morph in the owner chain is being deleted? Thanks. Sean -- View this message in context: http://forum.world.st/Unsubscribing-for-Announcements-tp3220751p3220751.html Sent from the Pharo Smalltalk mailing list archive at Nabble.com.

7 20

[Pharo-project] smalltalk color-print-style on a web page
by HwaJong Oh Aug. 20, 2011

Aug. 20, 2011

I want to put smalltalk code with syntax coloring as it is http://code.google.com/p/pharo/wiki/CommentOfTheDayContest on my web page http://appdal.com/groups/36442/wiki/bbd28/Pharo_comment_of_the_day_contest.… Best Regards -- View this message in context: http://forum.world.st/smalltalk-color-print-style-on-a-web-page-tp3296588p3… Sent from the Pharo Smalltalk mailing list archive at Nabble.com.

5 5

[Pharo-project] [ANN] SmalltalkHub demo online
by Nicolas Petton Aug. 3, 2011

Aug. 3, 2011

Hi, We are happy to announce the first public demo of SmalltalkHub: http://smalltalkhub.objectfusion.fr You can explore SmalltalkHub at: http://smalltalkhub.objectfusion.fr/explore This is an alpha quality demo, please use it for testing purposes only. Several features that will be included in the final release are missing, especially: - Team management - Client-side scripting features - Full commit lists Still incomplete features: - the UI for cloning is incomplete, especially, the list of forks is missing - The issue tracker is only partly implemented - Several admin tools are missing - The explore page misses a few things Cheers, Nicolas -- Objectfusion S.A.R.L. Web application development & design http://www.objectfusion.fr/en

16 45

[Pharo-project] [update 1.2] #12012
by Torsten Bergmann July 27, 2011

July 27, 2011

Hi Stef, updating from 12011 to 12012 doesnt work due to a syntax error again: Stack is below. How does "rch/Pharo/Pharo/PharoHarvestingFixes/PharoCore-1.1-12008" come in here .... It's the second time something like this happens. Bye T. -------------------------------------------------------------------------- Parser>>notify:at: Receiver: a Parser Arguments and temporary variables: string: 'Nothing more expected' location: 4 Receiver's instance variables: source: a ReadStream 'rch/Pharo/Pharo/PharoHarvestingFixes/PharoCore-1.1-12008....etc... mark: 5 hereChar: $/ aheadChar: $P token: 'Pharo' tokenType: #word currentComment: nil buffer: a WriteStream 'Pharo' typeTable: #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xB...etc... here: #/ hereType: #binary hereMark: 4 hereEnd: 4 prevMark: 1 prevEnd: 3 encoder: {an EncoderForV3PlusClosures} requestor: nil parseNode: {[^ self]} failBlock: [^ failBlock value] requestorOffset: 0 tempsMark: 4 doitFlag: false properties: an AdditionalMethodState category: #'initialize-release' Parser>>expected: Receiver: a Parser Arguments and temporary variables: aString: 'Nothing more' Receiver's instance variables: source: a ReadStream 'rch/Pharo/Pharo/PharoHarvestingFixes/PharoCore-1.1-12008....etc... mark: 5 hereChar: $/ aheadChar: $P token: 'Pharo' tokenType: #word currentComment: nil buffer: a WriteStream 'Pharo' typeTable: #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xB...etc... here: #/ hereType: #binary hereMark: 4 hereEnd: 4 prevMark: 1 prevEnd: 3 encoder: {an EncoderForV3PlusClosures} requestor: nil parseNode: {[^ self]} failBlock: [^ failBlock value] requestorOffset: 0 tempsMark: 4 doitFlag: false properties: an AdditionalMethodState category: #'initialize-release' Parser>>method:context: Receiver: a Parser Arguments and temporary variables: doit: false ctxt: nil sap: #(#rch #() 1) blk: {[^ self]} prim: 0 temps: #() messageComment: nil methodNode: nil Receiver's instance variables: source: a ReadStream 'rch/Pharo/Pharo/PharoHarvestingFixes/PharoCore-1.1-12008....etc... mark: 5 hereChar: $/ aheadChar: $P token: 'Pharo' tokenType: #word currentComment: nil buffer: a WriteStream 'Pharo' typeTable: #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xB...etc... here: #/ hereType: #binary hereMark: 4 hereEnd: 4 prevMark: 1 prevEnd: 3 encoder: {an EncoderForV3PlusClosures} requestor: nil parseNode: {[^ self]} failBlock: [^ failBlock value] requestorOffset: 0 tempsMark: 4 doitFlag: false properties: an AdditionalMethodState category: #'initialize-release' [] in Parser>>parse:class:category:noPattern:context:notifying:ifFail: Receiver: a Parser Arguments and temporary variables: <<error during printing> Receiver's instance variables: source: a ReadStream 'rch/Pharo/Pharo/PharoHarvestingFixes/PharoCore-1.1-12008....etc... mark: 5 hereChar: $/ aheadChar: $P token: 'Pharo' tokenType: #word currentComment: nil buffer: a WriteStream 'Pharo' typeTable: #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xB...etc... here: #/ hereType: #binary hereMark: 4 hereEnd: 4 prevMark: 1 prevEnd: 3 encoder: {an EncoderForV3PlusClosures} requestor: nil parseNode: {[^ self]} failBlock: [^ failBlock value] requestorOffset: 0 tempsMark: 4 doitFlag: false properties: an AdditionalMethodState category: #'initialize-release' BlockClosure>>on:do: Receiver: [methNode := self method: noPattern context: ctxt] Arguments and temporary variables: exception: ReparseAfterSourceEditing handlerAction: [:ex | repeatNeeded := true. myStream := requestor text string...etc... handlerActive: true Receiver's instance variables: outerContext: Parser>>parse:class:category:noPattern:context:notifying:ifFail: startpc: 134 numArgs: 0 Parser>>parse:class:category:noPattern:context:notifying:ifFail: Receiver: a Parser Arguments and temporary variables: <<error during printing> Receiver's instance variables: source: a ReadStream 'rch/Pharo/Pharo/PharoHarvestingFixes/PharoCore-1.1-12008....etc... mark: 5 hereChar: $/ aheadChar: $P token: 'Pharo' tokenType: #word currentComment: nil buffer: a WriteStream 'Pharo' typeTable: #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xB...etc... here: #/ hereType: #binary hereMark: 4 hereEnd: 4 prevMark: 1 prevEnd: 3 encoder: {an EncoderForV3PlusClosures} requestor: nil parseNode: {[^ self]} failBlock: [^ failBlock value] requestorOffset: 0 tempsMark: 4 doitFlag: false properties: an AdditionalMethodState category: #'initialize-release' Compiler>>translate:noPattern:ifFail: Receiver: a Compiler Arguments and temporary variables: aStream: a ReadStream 'rch/Pharo/Pharo/PharoHarvestingFixes/PharoCore-1.1-12008...etc... noPattern: false failBlock: [^ nil] Receiver's instance variables: sourceStream: a ReadStream 'rch/Pharo/Pharo/PharoHarvestingFixes/PharoCore-1.1-...etc... requestor: nil class: HelpBrowser category: #'initialize-release' context: nil parser: a Parser Compiler>>compile:in:classified:notifying:ifFail: Receiver: a Compiler Arguments and temporary variables: textOrStream: 'rch/Pharo/Pharo/PharoHarvestingFixes/PharoCore-1.1-12008.2.image...etc... aClass: HelpBrowser aCategory: #'initialize-release' aRequestor: nil failBlock: [^ nil] methodNode: nil Receiver's instance variables: sourceStream: a ReadStream 'rch/Pharo/Pharo/PharoHarvestingFixes/PharoCore-1.1-...etc... requestor: nil class: HelpBrowser category: #'initialize-release' context: nil parser: a Parser HelpBrowser class(Behavior)>>compile:classified:notifying:trailer:ifFail: Receiver: HelpBrowser Arguments and temporary variables: code: 'rch/Pharo/Pharo/PharoHarvestingFixes/PharoCore-1.1-12008.2.image' category: #'initialize-release' requestor: nil bytes: a CompiledMethodTrailer failBlock: [^ nil] methodNode: nil Receiver's instance variables: superclass: Object methodDict: a MethodDictionary(#close->(HelpBrowser>>#close "a CompiledMethod(7...etc... format: 138 instanceVariables: #('rootTopic' 'window' 'treeMorph' 'contentMorph') organization: ('accessing' rootTopic rootTopic:) ('actions' refresh) ('defaults...etc... subclasses: nil name: #HelpBrowser classPool: a Dictionary(#DefaultHelpBrowser->nil ) sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'HelpSystem-Core-UI' traitComposition: {} localSelectors: nil MethodAddition>>createCompiledMethod Receiver: a MethodAddition Arguments and temporary variables: Receiver's instance variables: text: 'rch/Pharo/Pharo/PharoHarvestingFixes/PharoCore-1.1-12008.2.image' category: #'initialize-release' changeStamp: '' requestor: nil logSource: true myClass: HelpBrowser methodAndNode: nil selector: nil compiledMethod: nil priorMethodOrNil: nil MCMethodDefinition>>addMethodAdditionTo: Receiver: a MCMethodDefinition(HelpBrowser>>initWindow) Arguments and temporary variables: aCollection: an OrderedCollection(a MethodAddition a MethodAddition a MethodAdd...etc... methodAddition: a MethodAddition Receiver's instance variables: classIsMeta: false source: 'rch/Pharo/Pharo/PharoHarvestingFixes/PharoCore-1.1-12008.2.image' category: #'initialize-release' selector: #initWindow className: #HelpBrowser timeStamp: '' [] in [] in [] in MCMultiPackageLoader(MCPackageLoader)>>basicLoad Receiver: a MCMultiPackageLoader Arguments and temporary variables: ea: a MCMethodDefinition(HelpBrowser>>initWindow) Receiver's instance variables: requirements: #() unloadableDefinitions: a SortedCollection() obsoletions: a Dictionary(a MCMethodDefinition(HelpBrowser class>>menuCommandOn...etc... additions: an OrderedCollection(a MCClassDefinition(DummyUIManager) a MCMethodD...etc... removals: an OrderedCollection(a MCMethodDefinition(WorldState class>>debugOn:)...etc... errorDefinitions: an OrderedCollection(a MCMethodDefinition(HelpBrowser>>initWi...etc... provisions: a Set(#PureBehaviorTest #PluggableSetTest #TimeStamp #BasicBehavior...etc... methodAdditions: an OrderedCollection(a MethodAddition a MethodAddition a Metho...etc... [] in [] in OrderedCollection(Collection)>>do:displayingProgress:every: Receiver: an OrderedCollection(a MCMethodDefinition(HelpBrowser>>initWindow)) Arguments and temporary variables: <<error during printing> Receiver's instance variables: array: an Array(nil nil a MCMethodDefinition(HelpBrowser>>initWindow) nil nil n...etc... firstIndex: 3 lastIndex: 3 OrderedCollection>>do: Receiver: an OrderedCollection(a MCMethodDefinition(HelpBrowser>>initWindow)) Arguments and temporary variables: aBlock: [:each | | newLabel | (count = 0 or: [count + 1 = size or: [(T...etc... index: 3 Receiver's instance variables: array: an Array(nil nil a MCMethodDefinition(HelpBrowser>>initWindow) nil nil n...etc... firstIndex: 3 lastIndex: 3 [] in OrderedCollection(Collection)>>do:displayingProgress:every: Receiver: an OrderedCollection(a MCMethodDefinition(HelpBrowser>>initWindow)) Arguments and temporary variables: <<error during printing> Receiver's instance variables: array: an Array(nil nil a MCMethodDefinition(HelpBrowser>>initWindow) nil nil n...etc... firstIndex: 3 lastIndex: 3 [] in [] in ProgressInitiationException>>defaultMorphicAction Receiver: ProgressInitiationException: Arguments and temporary variables: progress: [:barValArg | | barVal return newBarSize | barVal := barValArg. ret...etc... result: #(nil) Receiver's instance variables: messageText: nil tag: nil signalContext: ProgressInitiationException(Exception)>>signal handlerContext: nil outerContext: nil workBlock: [:bar | self do: [:each | | newLabel | (count = 0 or: ...etc... maxVal: 1 minVal: 0 aPoint: 338@339 progressTitle: '' BlockClosure>>on:do: Receiver: [result := workBlock value: progress] Arguments and temporary variables: exception: ProgressNotification handlerAction: [:ex | ex extraParam isString ifTrue: [SystemProgressMorph un...etc... handlerActive: true Receiver's instance variables: outerContext: [] in ProgressInitiationException>>defaultMorphicAction startpc: 83 numArgs: 0 [] in ProgressInitiationException>>defaultMorphicAction Receiver: ProgressInitiationException: Arguments and temporary variables: progress: [:barValArg | | barVal return newBarSize | barVal := barValArg. ret...etc... result: #(nil) Receiver's instance variables: messageText: nil tag: nil signalContext: ProgressInitiationException(Exception)>>signal handlerContext: nil outerContext: nil workBlock: [:bar | self do: [:each | | newLabel | (count = 0 or: ...etc... maxVal: 1 minVal: 0 aPoint: 338@339 progressTitle: '' BlockClosure>>ensure: Receiver: [[result := workBlock value: progress] on: ProgressNotification do: [:ex | ex extr...etc... Arguments and temporary variables: aBlock: [SystemProgressMorph close: progress] complete: nil returnValue: nil Receiver's instance variables: outerContext: ProgressInitiationException>>defaultMorphicAction startpc: 77 numArgs: 0 ProgressInitiationException>>defaultMorphicAction Receiver: ProgressInitiationException: Arguments and temporary variables: progress: [:barValArg | | barVal return newBarSize | barVal := barValArg. ret...etc... result: #(nil) Receiver's instance variables: messageText: nil tag: nil signalContext: ProgressInitiationException(Exception)>>signal handlerContext: nil outerContext: nil workBlock: [:bar | self do: [:each | | newLabel | (count = 0 or: ...etc... maxVal: 1 minVal: 0 aPoint: 338@339 progressTitle: '' ProgressInitiationException>>defaultAction Receiver: ProgressInitiationException: Arguments and temporary variables: Receiver's instance variables: messageText: nil tag: nil signalContext: ProgressInitiationException(Exception)>>signal handlerContext: nil outerContext: nil workBlock: [:bar | self do: [:each | | newLabel | (count = 0 or: ...etc... maxVal: 1 minVal: 0 aPoint: 338@339 progressTitle: '' UndefinedObject>>handleSignal: Receiver: nil Arguments and temporary variables: exception: ProgressInitiationException: Receiver's instance variables: nil MethodContext(ContextPart)>>handleSignal: Receiver: BlockClosure>>on:do: Arguments and temporary variables: exception: ProgressInitiationException: val: nil Receiver's instance variables: sender: PasteUpMorph>>becomeActiveDuring: pc: 17 stackp: 3 method: (BlockClosure>>#on:do: "a CompiledMethod(445382656)") closureOrNil: nil receiver: [aBlock value] MethodContext(ContextPart)>>handleSignal: Receiver: BlockClosure>>on:do: Arguments and temporary variables: exception: ProgressInitiationException: val: nil Receiver's instance variables: sender: [] in ProgressInitiationException>>defaultMorphicAction pc: 17 stackp: 3 method: (BlockClosure>>#on:do: "a CompiledMethod(445382656)") closureOrNil: nil receiver: [result := workBlock value: progress] MethodContext(ContextPart)>>handleSignal: Receiver: BlockClosure>>on:do: Arguments and temporary variables: exception: ProgressInitiationException: val: nil Receiver's instance variables: sender: [] in MultiByteBinaryOrTextStream(PositionableStream)>>fileInAnnouncing...etc... pc: 17 stackp: 3 method: (BlockClosure>>#on:do: "a CompiledMethod(445382656)") closureOrNil: nil receiver: [| chunk | val := (self peekFor: $!) ifTrue: [(Compiler evaluate:...etc... MethodContext(ContextPart)>>handleSignal: Receiver: BlockClosure>>on:do: Arguments and temporary variables: exception: ProgressInitiationException: val: nil Receiver's instance variables: sender: [] in MCMultiPackageLoader(MCPackageLoader)>>basicLoad pc: 17 stackp: 3 method: (BlockClosure>>#on:do: "a CompiledMethod(445382656)") closureOrNil: nil receiver: [additions do: [:ea | self loadClassDefinition: ea] displayingPro...etc... ProgressInitiationException(Exception)>>signal Receiver: ProgressInitiationException: Arguments and temporary variables: Receiver's instance variables: messageText: nil tag: nil signalContext: ProgressInitiationException(Exception)>>signal handlerContext: nil outerContext: nil workBlock: [:bar | self do: [:each | | newLabel | (count = 0 or: ...etc... maxVal: 1 minVal: 0 aPoint: 338@339 progressTitle: '' ProgressInitiationException>>display:at:from:to:during: Receiver: ProgressInitiationException: Arguments and temporary variables: argString: '' argPoint: 338@339 argMinVal: 0 argMaxVal: 1 argWorkBlock: [:bar | self do: [:each | | newLabel | (count = 0 o...etc... Receiver's instance variables: messageText: nil tag: nil signalContext: ProgressInitiationException(Exception)>>signal handlerContext: nil outerContext: nil workBlock: [:bar | self do: [:each | | newLabel | (count = 0 or: ...etc... maxVal: 1 minVal: 0 aPoint: 338@339 progressTitle: '' ProgressInitiationException class>>display:at:from:to:during: Receiver: ProgressInitiationException Arguments and temporary variables: aString: '' aPoint: 338@339 minVal: 0 maxVal: 1 workBlock: [:bar | self do: [:each | | newLabel | (count = 0 or: ...etc... Receiver's instance variables: superclass: Exception methodDict: a MethodDictionary(#defaultAction->(ProgressInitiationException>>#d...etc... format: 150 instanceVariables: #('workBlock' 'maxVal' 'minVal' 'aPoint' 'progressTitle') organization: ('as yet unclassified' defaultAction defaultMorphicAction display...etc... subclasses: nil name: #ProgressInitiationException classPool: nil sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'Morphic-Widgets' traitComposition: {} localSelectors: nil ByteString(String)>>displayProgressAt:from:to:during: Receiver: '' Arguments and temporary variables: aPoint: 338@339 minVal: 0 maxVal: 1 workBlock: [:bar | self do: [:each | | newLabel | (count = 0 or: ...etc... Receiver's instance variables: '' OrderedCollection(Collection)>>do:displayingProgress:every: Receiver: an OrderedCollection(a MCMethodDefinition(HelpBrowser>>initWindow)) Arguments and temporary variables: <<error during printing> Receiver's instance variables: array: an Array(nil nil a MCMethodDefinition(HelpBrowser>>initWindow) nil nil n...etc... firstIndex: 3 lastIndex: 3 OrderedCollection(Collection)>>do:displayingProgress: Receiver: an OrderedCollection(a MCMethodDefinition(HelpBrowser>>initWindow)) Arguments and temporary variables: aBlock: [:ea | ea addMethodAdditionTo: methodAdditions] aStringOrBlock: 'Reloading...' Receiver's instance variables: array: an Array(nil nil a MCMethodDefinition(HelpBrowser>>initWindow) nil nil n...etc... firstIndex: 3 lastIndex: 3 [] in [] in MCMultiPackageLoader(MCPackageLoader)>>basicLoad Receiver: a MCMultiPackageLoader Arguments and temporary variables: Receiver's instance variables: requirements: #() unloadableDefinitions: a SortedCollection() obsoletions: a Dictionary(a MCMethodDefinition(HelpBrowser class>>menuCommandOn...etc... additions: an OrderedCollection(a MCClassDefinition(DummyUIManager) a MCMethodD...etc... removals: an OrderedCollection(a MCMethodDefinition(WorldState class>>debugOn:)...etc... errorDefinitions: an OrderedCollection(a MCMethodDefinition(HelpBrowser>>initWi...etc... provisions: a Set(#PureBehaviorTest #PluggableSetTest #TimeStamp #BasicBehavior...etc... methodAdditions: an OrderedCollection(a MethodAddition a MethodAddition a Metho...etc... BlockClosure>>on:do: Receiver: [additions do: [:ea | self loadClassDefinition: ea] displayingProgress: 'Loading class...etc... Arguments and temporary variables: exception: InMidstOfFileinNotification handlerAction: [:n | n resume: true] handlerActive: true Receiver's instance variables: outerContext: [] in MCMultiPackageLoader(MCPackageLoader)>>basicLoad startpc: 112 numArgs: 0 [] in MCMultiPackageLoader(MCPackageLoader)>>basicLoad Receiver: a MCMultiPackageLoader Arguments and temporary variables: Receiver's instance variables: requirements: #() unloadableDefinitions: a SortedCollection() obsoletions: a Dictionary(a MCMethodDefinition(HelpBrowser class>>menuCommandOn...etc... additions: an OrderedCollection(a MCClassDefinition(DummyUIManager) a MCMethodD...etc... removals: an OrderedCollection(a MCMethodDefinition(WorldState class>>debugOn:)...etc... errorDefinitions: an OrderedCollection(a MCMethodDefinition(HelpBrowser>>initWi...etc... provisions: a Set(#PureBehaviorTest #PluggableSetTest #TimeStamp #BasicBehavior...etc... methodAdditions: an OrderedCollection(a MethodAddition a MethodAddition a Metho...etc... BlockClosure>>ensure: Receiver: [[additions do: [:ea | self loadClassDefinition: ea] displayingProgress: 'Loading clas...etc... Arguments and temporary variables: aBlock: [self flushChangesFile] complete: nil returnValue: nil Receiver's instance variables: outerContext: MCMultiPackageLoader(MCPackageLoader)>>basicLoad startpc: 108 numArgs: 0 MCMultiPackageLoader(MCPackageLoader)>>basicLoad Receiver: a MCMultiPackageLoader Arguments and temporary variables: Receiver's instance variables: requirements: #() unloadableDefinitions: a SortedCollection() obsoletions: a Dictionary(a MCMethodDefinition(HelpBrowser class>>menuCommandOn...etc... additions: an OrderedCollection(a MCClassDefinition(DummyUIManager) a MCMethodD...etc... removals: an OrderedCollection(a MCMethodDefinition(WorldState class>>debugOn:)...etc... errorDefinitions: an OrderedCollection(a MCMethodDefinition(HelpBrowser>>initWi...etc... provisions: a Set(#PureBehaviorTest #PluggableSetTest #TimeStamp #BasicBehavior...etc... methodAdditions: an OrderedCollection(a MethodAddition a MethodAddition a Metho...etc... [] in MCMultiPackageLoader(MCPackageLoader)>>loadWithNameLike: Receiver: a MCMultiPackageLoader Arguments and temporary variables: Receiver's instance variables: requirements: #() unloadableDefinitions: a SortedCollection() obsoletions: a Dictionary(a MCMethodDefinition(HelpBrowser class>>menuCommandOn...etc... additions: an OrderedCollection(a MCClassDefinition(DummyUIManager) a MCMethodD...etc... removals: an OrderedCollection(a MCMethodDefinition(WorldState class>>debugOn:)...etc... errorDefinitions: an OrderedCollection(a MCMethodDefinition(HelpBrowser>>initWi...etc... provisions: a Set(#PureBehaviorTest #PluggableSetTest #TimeStamp #BasicBehavior...etc... methodAdditions: an OrderedCollection(a MethodAddition a MethodAddition a Metho...etc... [] in MCMultiPackageLoader(MCPackageLoader)>>useChangeSetNamed:during: Receiver: a MCMultiPackageLoader Arguments and temporary variables: aBlock: [self basicLoad] Receiver's instance variables: requirements: #() unloadableDefinitions: a SortedCollection() obsoletions: a Dictionary(a MCMethodDefinition(HelpBrowser class>>menuCommandOn...etc... additions: an OrderedCollection(a MCClassDefinition(DummyUIManager) a MCMethodD...etc... removals: an OrderedCollection(a MCMethodDefinition(WorldState class>>debugOn:)...etc... errorDefinitions: an OrderedCollection(a MCMethodDefinition(HelpBrowser>>initWi...etc... provisions: a Set(#PureBehaviorTest #PluggableSetTest #TimeStamp #BasicBehavior...etc... methodAdditions: an OrderedCollection(a MethodAddition a MethodAddition a Metho...etc... --- The full stack --- Parser>>notify:at: Parser>>expected: Parser>>method:context: [] in Parser>>parse:class:category:noPattern:context:notifying:ifFail: BlockClosure>>on:do: Parser>>parse:class:category:noPattern:context:notifying:ifFail: Compiler>>translate:noPattern:ifFail: Compiler>>compile:in:classified:notifying:ifFail: HelpBrowser class(Behavior)>>compile:classified:notifying:trailer:ifFail: MethodAddition>>createCompiledMethod MCMethodDefinition>>addMethodAdditionTo: [] in [] in [] in MCMultiPackageLoader(MCPackageLoader)>>basicLoad [] in [] in OrderedCollection(Collection)>>do:displayingProgress:every: OrderedCollection>>do: [] in OrderedCollection(Collection)>>do:displayingProgress:every: [] in [] in ProgressInitiationException>>defaultMorphicAction BlockClosure>>on:do: [] in ProgressInitiationException>>defaultMorphicAction BlockClosure>>ensure: ProgressInitiationException>>defaultMorphicAction ProgressInitiationException>>defaultAction UndefinedObject>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: ProgressInitiationException(Exception)>>signal ProgressInitiationException>>display:at:from:to:during: ProgressInitiationException class>>display:at:from:to:during: ByteString(String)>>displayProgressAt:from:to:during: OrderedCollection(Collection)>>do:displayingProgress:every: OrderedCollection(Collection)>>do:displayingProgress: [] in [] in MCMultiPackageLoader(MCPackageLoader)>>basicLoad BlockClosure>>on:do: [] in MCMultiPackageLoader(MCPackageLoader)>>basicLoad BlockClosure>>ensure: MCMultiPackageLoader(MCPackageLoader)>>basicLoad [] in MCMultiPackageLoader(MCPackageLoader)>>loadWithNameLike: [] in MCMultiPackageLoader(MCPackageLoader)>>useChangeSetNamed:during: - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - BlockClosure>>ensure: MCMultiPackageLoader(MCPackageLoader)>>useChangeSetNamed:during: MCMultiPackageLoader(MCPackageLoader)>>useNewChangeSetNamedLike:during: MCMultiPackageLoader(MCPackageLoader)>>loadWithNameLike: MCVersionLoader>>loadWithNameLike: MCVersionLoader>>load ScriptLoader>>loadTogether:merge: ScriptLoader>>update12012 UndefinedObject>>DoIt Compiler>>evaluate:in:to:notifying:ifFail:logged: Compiler class>>evaluate:for:notifying:logged: Compiler class>>evaluate:for:logged: Compiler class>>evaluate:logged: [] in [] in MultiByteBinaryOrTextStream(PositionableStream)>>fileInAnnouncing: BlockClosure>>on:do: [] in MultiByteBinaryOrTextStream(PositionableStream)>>fileInAnnouncing: [] in [] in ProgressInitiationException>>defaultMorphicAction BlockClosure>>on:do: [] in ProgressInitiationException>>defaultMorphicAction BlockClosure>>ensure: ProgressInitiationException>>defaultMorphicAction ProgressInitiationException>>defaultAction UndefinedObject>>handleSignal: MethodContext(ContextPart)>>handleSignal: ProgressInitiationException(Exception)>>signal ProgressInitiationException>>display:at:from:to:during: ProgressInitiationException class>>display:at:from:to:during: ByteString(String)>>displayProgressAt:from:to:during: MultiByteBinaryOrTextStream(PositionableStream)>>fileInAnnouncing: [] in ChangeSet class>>newChangesFromStream:named: BlockClosure>>ensure: ChangeSet class>>newChangesFromStream:named: [] in Utilities class>>readServer:special:updatesThrough:saveLocally:updateImage: BlockClosure>>ensure: CursorWithMask(Cursor)>>showWhile: Utilities class>>readServer:special:updatesThrough:saveLocally:updateImage: Utilities class>>readServerUpdatesThrough:saveLocally:updateImage: Utilities class>>readServerUpdatesSaveLocally:updateImage: Utilities class>>updateFromServer [] in [] in WorldState class>>systemOn: [] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: BlockClosure>>ensure: CursorWithMask(Cursor)>>showWhile: ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: ToggleMenuItemMorph(MenuItemMorph)>>mouseUp: ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp: MouseButtonEvent>>sentTo: ToggleMenuItemMorph(Morph)>>handleEvent: MorphicEventDispatcher>>dispatchDefault:with: MorphicEventDispatcher>>dispatchEvent:with: ToggleMenuItemMorph(Morph)>>processEvent:using: MorphicEventDispatcher>>dispatchDefault:with: MorphicEventDispatcher>>dispatchEvent:with: MenuMorph(Morph)>>processEvent:using: MenuMorph(Morph)>>processEvent: MenuMorph>>handleFocusEvent: [] in HandMorph>>sendFocusEvent:to:clear: [] in PasteUpMorph>>becomeActiveDuring: BlockClosure>>on:do: PasteUpMorph>>becomeActiveDuring: HandMorph>>sendFocusEvent:to:clear: HandMorph>>sendEvent:focus:clear: HandMorph>>sendMouseEvent: HandMorph>>handleEvent: HandMorph>>processEvents [] in WorldState>>doOneCycleNowFor: Array(SequenceableCollection)>>do: WorldState>>handsDo: WorldState>>doOneCycleNowFor: WorldState>>doOneCycleFor: PasteUpMorph>>doOneCycle [] in Project class>>spawnNewProcess [] in BlockClosure>>newProcess -- GMX DSL: Internet-, Telefon- und Handy-Flat ab 19,99 EUR/mtl. Bis zu 150 EUR Startguthaben inklusive! http://portal.gmx.net/de/go/dsl

12 23

[Pharo-project] Mocketry?
by Alexandre Bergel July 19, 2011

July 19, 2011

Hi! Following some discussion about Mocketry, I wanted to know more about it. I've found http://www.cincomsmalltalk.com/publicRepository/Mocketry(Bundle).html and the squeaksource project. I read the tests but this is a bit cryptic. In 5 minutes, I couldn't find what it was exactly about. Any good url that google does not know about? Cheers, Alexandre -- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: Alexandre Bergel http://www.bergel.eu ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.

5 8

[Pharo-project] changes with announcements ?
by Cyrille Delaunay June 28, 2011

June 28, 2011

Hello, Today I experimented some strange behaviours with announcements that I didn't have in some previous moose images (moose in now based on Pharo 1.3). I think that there was some changes related to announcements in pharo recently, but I could not be sure it is related. At one point in my code I have: browser on: AnnouncementClass send: #actionSelector browser announce: anAnnouncementClass. .... .... The behaviour I have is like if #actionSelector was executed asynchronously from the rest of the code below 'browser announce: ...' . Not sure but there is maybe something with exception signals. If any signal is emited in #actionSelector it will not execute the rest of the method. I was at least able to write a test that do not pass in latest pharo 1.3 Gofer new squeaksource: 'DelaunayTmpStuffs'; package: 'ExampleAnnouncementProblems'; load.

4 12