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

[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] [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] Draft chapter on Settings Framework for PBE2 now online
by Oscar Nierstrasz June 21, 2011

June 21, 2011

Hi Folks, There is now a draft chapter on the Settings Framework for "Pharo by Example 2" available for review: https://gforge.inria.fr/frs/download.php/28243/Settings.pdf http://pharobyexample.org/ Cheers, - on

4 7

[Pharo-project] Fuel - a fast object deployment tool
by Martin Dias June 20, 2011

June 20, 2011

Hi all Last months I and Tristan have been working on Fuel project, an object binary serialization tool. The idea is that objects are much more times loaded than stored, therefore it is worth to spend time while storing in order to have faster loading and user experience. We present an implementation of a pickle format that is based on clustering similar objects. There is a summary of the project below, but more complete information is available here: http://rmod.lille.inria.fr/web/pier/software/Fuel The implementation still needs a lot of work to be really useful, optimizations should be done, but we'll be glad to get feedback of the community. = Pickle format = The pickle format and the serialization algorithm main idea, is explained in this slides: http://www.slideshare.net/tinchodias/fuel-serialization-in-an-example = Current features = - Class shape changing (when a variable has been added, or removed, or its index changed) - Serialize most of the basic objects. - Serialize (almost) any CompiledMethod - Detection of global or class variables - Support for cyclic object graphs - Tests = Next steps = - Improve version checking. - Optimize performance. - Serialize more kinds of objects: -- Class with its complete description. -- Method contexts -- Active block closures -- Continuation - Some improvements for the user: -- pre and post actions to be executed. -- easily say 'this object is singleton'. - Partial loading of a stored graph. - Fast statistics/brief info extraction of a stored graph. - ConfigurationOfFuel. - Be able to deploy materialization behavior only (independent from the serialization behavior) = Download = In a Pharo 1.1 or 1.1.1 evaluate: Gofer new squeaksource: 'Fuel'; version: 'Fuel-MartinDias.74'; version: 'FuelBenchmarks-MartinDias.4'; load. = Benchmarks = You can run benchmarks executing this line (results in Transcript): FLBenchmarks newBasic run. Thank you! Martin Dias

15 70

Re: [Pharo-project] [Pharo-users] Pharo Talk ESUG 2010
by Marcus Denker June 9, 2011

June 9, 2011

On Oct 7, 2010, at 1:23 AM, GermÃ¡n Arduino wrote: > hehe, thanks! > > You will come to Smalltalks 2010 ? Yes, Mariano, Luc and me. > > I was thinking exactly in ask permit to use this one (and other > similars) to present Pharo in other contexts, for example in localgroups, etc. Normally all my talks are CC non-commercial share-alike... only that I often forget to put it in the slides... > That's perfectly allowed and even more, a ppt/keypoint template should be available. 2 days ago Marcus borrowed this one for my PhD first year evaliuation ;) Ok, I have put the keynote (zipped): http://marcusdenker.de/talks/10ESUG/ -- Marcus Denker -- http://www.marcusdenker.de INRIA Lille -- Nord Europe. Team RMoD.

4 3

[Pharo-project] FastCGI support in Pharo
by Dario Trussardi June 1, 2011

June 1, 2011

Hi, i have a Lighttpd server with FastCGI support for deployment system ( based on GLASS ). Now i'm interested to work with the same web server for development system based on Pharo. For now in Pharo i use the WAKom interface. I can load the FastCGI support into Pharo ? Thank for any consideration, Dario

2 2

[Pharo-project] Issue 3572 in pharo: Failing test on Hudson: MCInitializationTest.testWorkingCopy
by pharo＠googlecode.com April 17, 2011

April 17, 2011

Status: Accepted Owner: marcus.d...(a)gmail.com Labels: Milestone-1.2 Milestone-1.3 New issue 3572 by marcus.d...(a)gmail.com: Failing test on Hudson: MCInitializationTest.testWorkingCopy http://code.google.com/p/pharo/issues/detail?id=3572 MCInitializationTest.testWorkingCopy strange.

1 6

[Pharo-project] Issue 3655 in pharo: Tools->Configuration browser fails with DNU in Pharo1.3
by pharo＠googlecode.com April 17, 2011

April 17, 2011

Status: Accepted Owner: marcus.d...(a)gmail.com New issue 3655 by marcus.d...(a)gmail.com: Tools->Configuration browser fails with DNU in Pharo1.3 http://code.google.com/p/pharo/issues/detail?id=3655 Tools->Configuration browser fails with DNU in Pharo1.3

1 1

[Pharo-project] Issue 3573 in pharo: Failing Test: CompiledMethodTest.testPerformInSuperclassCanExecutelongMethodWithTemps
by pharo＠googlecode.com April 16, 2011

April 16, 2011

Status: Accepted Owner: marcus.d...(a)gmail.com Labels: Milestone-1.3 New issue 3573 by marcus.d...(a)gmail.com: Failing Test: CompiledMethodTest.testPerformInSuperclassCanExecutelongMethodWithTemps http://code.google.com/p/pharo/issues/detail?id=3573 CompiledMethodTest.testPerformInSuperclassCanExecutelongMethodWithTemps Reason: VM Bug.

1 2