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

[Pharo-project] [update 1.3] #13289
by Marcus Denker July 28, 2011

July 28, 2011

13289 ----- Issue 4555: Fix SUnit to prevent forked process from escaping to debugger Issue 4558: Test Runner UI is strange -- Marcus Denker -- http://marcusdenker.de

2 1

[Pharo-project] [update 1.3] #13288
by Marcus Denker July 28, 2011

July 28, 2011

13288 ----- Issue 4500: Put SUnit-Help be put into a separate package Issue 4508: SimpleMorphic package is back. Remove -- Marcus Denker -- http://marcusdenker.de

2 1

[Pharo-project] FloatArray inaccuracy
by Martin Dias July 28, 2011

July 28, 2011

Hi I found that FloatArray>>at:put: is inaccurate: | floats | floats := FloatArray new: 1. floats at: 1 put: 11.22321. floats at: 1 " ------------> 11.223210334777832 " Do you know this issue? This is the implementation of at:put:: at: index put: value <primitive: 'primitiveAtPut' module: 'FloatArrayPlugin'> value isFloat ifTrue:[self basicAt: index put: value asIEEE32BitWord] ifFalse:[self at: index put: value asFloat]. ^value Thanks in advance Martin

2 3

[Pharo-project] Does anyone has FUEL running in Pharo 1.3?
by Friedrich Dominicus July 28, 2011

July 28, 2011

Just wondering, because while trying to load it I get an error message Regards Friedrich -- Q-Software Solutions GmbH; Sitz: Bruchsal; Registergericht: Mannheim Registriernummer: HRB232138; Geschaeftsfuehrer: Friedrich Dominicus

3 4

[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

Re: [Pharo-project] [Pharo-users] invalid utf8 input detected
by Sven Van Caekenberghe July 27, 2011

July 27, 2011

On 27 Jul 2011, at 05:49, Jon Hancock wrote: > Thanks Sven. I'm using the latest Cog build on the latest pharo 1.3 build on linux with ubuntu system fonts loaded and am using in pharo the same font as my gEdit text editor which displays correctly. > Anyone know why this error occurs or why the fonts show up as question marks. I am trying to consider using pharo for some Chinese projects and need to ensure all string throughout pharo respect UTF8 well. Is the smalltalk code also stored in UTF8 form? > Also, anyone have a trick for capturing the full stack trace from a walkback or debugger as a text stream so I can copy into emails? I think one of the regular Linux users might be better placed to answer, as this relates to UX issues. Internally, Pharo uses Unicode. UTF8 is one of a list of possible encodings (and the most used one for non ASCII). What happens when you paste from the system clipboard to Pharo is some kind of import, propably with conversions going on. This necessarily depends on the VM and OS. On Mac OS X this seems to 'just work' as expected. In your case is seems to fail. Anyone better placed to help Jon ? Sven

1 0

[Pharo-project] [update 1.4] #14061
by Igor Stasenko July 27, 2011

July 27, 2011

- Issue 4555: Fix SUnit to prevent forked process from escaping to debugger http://code.google.com/p/pharo/issues/detail?id=4555 -- Best regards, Igor Stasenko AKA sig.

1 0

[Pharo-project] TestCase>>#should:notTakeMoreThan: behaves not well in headless mode
by Igor Stasenko July 27, 2011

July 27, 2011

It forks a process for evaluating a block you passing. And it works quite well if there's no exception during block evaluation.. but if there is, then it signals the TestFailure exception, not in a process who waits test to be finished, but in a process which forked. And then since there is no exception handler, it using default action, which just to open a debugger. In headless mode it leads to immediate quit from image and logging error report. Like following: THERE_BE_DRAGONS_HERE MessageNotUnderstood: NonInteractiveUIManager>>openDebuggerOn:context:label:contents:fullView: 26 July 2011 6:35:08 pm VM: unix - i686 - linux-gnu - Croquet Closure Cog VM [CoInterpreter VMMaker-oscog-IgorStasenko.108] Image: Pharo1.4a [Latest update: #14025] NonInteractiveUIManager(Object)>>doesNotUnderstand: #openDebuggerOn:context:label:contents:fullView: Receiver: a NonInteractiveUIManager Arguments and temporary variables: aMessage: openDebuggerOn: a Process in nil context: MethodContextTest(TestCase)...etc... exception: MessageNotUnderstood: NonInteractiveUIManager>>openDebuggerOn:contex...etc... resumeValue: nil Receiver's instance variables: uiManager: a MorphicUIManager doNotQuitOnRestart: false Debugger class>>openOn:context:label:contents:fullView: Receiver: Debugger Arguments and temporary variables: process: a Process in nil context: MethodContextTest(TestCase)>>signalFailure: title: 'TestFailure: Assertion failed' contentsStringOrNil: nil bool: false fullView: false Receiver's instance variables: superclass: CodeHolder methodDict: a MethodDictionary(#addOptionalButtonsTo:at:plus:->(Debugger>>#addO...etc... format: 168 instanceVariables: #('interruptedProcess' 'interruptedController' 'contextStack...etc... organization: ('*Polymorph-Widgets' addOptionalButtonsTo:at:plus: buildMorphicN...etc... subclasses: nil name: #Debugger classPool: a Dictionary(#AlwaysOpenFullDebugger->false #ContextStackKeystrokes-...etc... sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'Tools-Debugger' traitComposition: {} localSelectors: nil [:tool | ^ tool openOn: aProcess context: aContext label: aString contents: contents fullView: aBool] in ToolRegistry>>debug:context:label:contents:fullView: Receiver: a ToolRegistry Arguments and temporary variables: aProcess: Debugger aContext: a Process in nil aString: MethodContextTest(TestCase)>>signalFailure: contents: 'TestFailure: Assertion failed' aBool: nil tool: false Receiver's instance variables: tools: an IdentityDictionary(#basicInspector->BasicInspector #browser->[self de...etc... inspectorsMap: an IdentityDictionary(#CompiledMethod->#CompiledMethodInspector ...etc... ToolRegistry>>using:do: Receiver: a ToolRegistry Arguments and temporary variables: aToolName: #debugger aBlock: [:tool | ^ tool openOn: aProcess context: aContext label: aString...etc... tool: Debugger Receiver's instance variables: tools: an IdentityDictionary(#basicInspector->BasicInspector #browser->[self de...etc... inspectorsMap: an IdentityDictionary(#CompiledMethod->#CompiledMethodInspector ...etc... ToolRegistry>>debug:context:label:contents:fullView: Receiver: a ToolRegistry Arguments and temporary variables: aProcess: a Process in nil aContext: MethodContextTest(TestCase)>>signalFailure: aString: 'TestFailure: Assertion failed' contents: nil aBool: false Receiver's instance variables: tools: an IdentityDictionary(#basicInspector->BasicInspector #browser->[self de...etc... inspectorsMap: an IdentityDictionary(#CompiledMethod->#CompiledMethodInspector ...etc... Process>>debug:title:full: Receiver: a Process in nil Arguments and temporary variables: context: MethodContextTest(TestCase)>>signalFailure: title: 'TestFailure: Assertion failed' bool: false topCtxt: Process>>debug:title:full: Receiver's instance variables: nextLink: nil suspendedContext: nil priority: 40 myList: nil threadId: nil errorHandler: nil name: 'Process to evaluate should: notTakeMoreThanMilliseconds:' env: nil Process>>debug:title: Receiver: a Process in nil Arguments and temporary variables: context: MethodContextTest(TestCase)>>signalFailure: title: 'TestFailure: Assertion failed' Receiver's instance variables: nextLink: nil suspendedContext: nil priority: 40 myList: nil threadId: nil errorHandler: nil name: 'Process to evaluate should: notTakeMoreThanMilliseconds:' env: nil TestFailure>>defaultAction Receiver: TestFailure: Assertion failed Arguments and temporary variables: Receiver's instance variables: messageText: 'Assertion failed' tag: nil signaler: MethodContextTest>>#testClosureRestart signalContext: TestFailure(Exception)>>signal handlerContext: nil outerContext: nil .... This happens when you run a MethodContextTest>>#testClosureRestart on Cog VM. Why it fails is another story :) But we need to fix the tester somehow, in order to continue running rest of tests instead of quitting to OS. The problem is that "aBlock value" which signals the exception should be wrapped by exception handler. And then #should:notTakeMoreThan: should report that exception to the main process which runs the test. So, a failure would be either due to timeout or due to failing running the code without exceptions. Any suggestions? -- Best regards, Igor Stasenko AKA sig.

2 3

Re: [Pharo-project] Downloading 1.4
by Marcus Denker July 26, 2011

July 26, 2011

On Jul 26, 2011, at 7:53 PM, Sean P. DeNigris wrote: > > StÃ©phane Ducasse wrote: >> >> https://ci.lille.inria.fr/pharo/job/ >> > > Thanks. It doesn't seem to launch with the Mac Carbon 4.2.5 VM (the only one > with all the plugins built :( ), although it did launch with the Stack > 4.0.0. > > I created Issue 4553. Is it really realistic to support 20 differents VMs? Who is going to test? Marcus -- Marcus Denker Do it together: http://taskfor.us

5 5

[Pharo-project] problem with text editor when editing code and get a proposal to change it
by StÃ©phane Ducasse July 26, 2011

July 26, 2011

Hi guys In 1.4 I get an annoying regression, when the system propose me a change my text gets mangled or not updated. Am I the only one to get that? It would be good to fix that. Stef

4 4