THERE_BE_DRAGONS_HERE ZnInvalidUTF8: Invalid utf8 input detected 12 November 2014 10:04:50.229748 am VM: unix - i686 - linux-gnu - NBCoInterpreter NativeBoost-CogPlugin-EstebanLorenzano.20 uuid: cf2aeeee-897d-48fd-8251-6789dd21d958 Jun 14 2014 NBCogit NativeBoost-CogPlugin-EstebanLorenzano.20 uuid: cf2aeeee-897d-48fd-8251-6789dd21d958 Jun 14 2014 https://github.com/pharo-project/pharo-vm.git Commit: 0e8bbfbaeb03237fa6bb63ba834773fab18ca307 Date: 2014-06-14 12:20:21 -0300 By: Esteban Lorenzano Jenkins build #14833 Image: Pharo3.0 [Latest update: #30858] UTF8TextConverter>>errorMalformedInput Receiver: an UTF8TextConverter Arguments and temporary variables: Receiver's instance variables: latin1Map: #[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...etc... latin1Encodings: #(nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil ...etc... UTF8TextConverter>>nextFromStream: Receiver: an UTF8TextConverter Arguments and temporary variables: aStream: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-...etc... character1: $������ value1: 169 character2: $' value2: 39 unicode: nil character3: $! value3: 33 character4: nil value4: nil Receiver's instance variables: latin1Map: #[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...etc... latin1Encodings: #(nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil ...etc... MultiByteFileStream>>next Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: char: nil secondChar: nil state: nil Receiver's instance variables: MultiByteFileStream(PositionableStream)>>oldBack Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: Receiver's instance variables: MultiByteFileStream(PositionableStream)>>oldPeekBack Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: element: nil Receiver's instance variables: MultiByteFileStream(PositionableStream)>>backChunk Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: terminator: $! out: a WriteStream ch: $! Receiver's instance variables: WriteStream(PositionableStream)>>copyPreamble:from:at: Receiver: a WriteStream Arguments and temporary variables: preamble: 'DrGeoScript230911418 methodsFor: ''public''' aStream: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-...etc... pos: 37916605 terminator: $! last50: nil stamp: nil i: nil Receiver's instance variables: collection: '''From Pharo3.0 of 18 March 2013 [Latest update: #30858] on 12 Nov...etc... position: 312 readLimit: 0 writeLimit: 387 DrGeoScript230911418 class(ClassDescription)>>printMethodChunk:withPreamble:on:moveSource:toFile: Receiver: DrGeoScript230911418 Arguments and temporary variables: selector: #description doPreamble: true outStream: a WriteStream moveSource: false fileIndex: 0 preamble: 'DrGeoScript230911418 methodsFor: ''public''' method: DrGeoScript230911418>>#description oldPos: 37916605 newPos: nil sourceFile: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/D...etc... endPos: nil Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#compute->DrGeoScript230911418>>#compute #descri...etc... format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScript230911418 classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil [ :sel | self printMethodChunk: sel withPreamble: true on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScript230911418 class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: Receiver: DrGeoScript230911418 Arguments and temporary variables: aSymbol: #public aFileStream: a WriteStream moveSource: false fileIndex: 0 selectors: #(#description #compute #scriptName) sel: #description Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#compute->DrGeoScript230911418>>#compute #descri...etc... format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScript230911418 classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil Array(SequenceableCollection)>>do: Receiver: #(#description #compute #scriptName) Arguments and temporary variables: aBlock: [ :sel | self printMethodChunk: sel withPreamble: true on: aFileStr...etc... index: 1 Receiver's instance variables: #(#description #compute #scriptName) DrGeoScript230911418 class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: Receiver: DrGeoScript230911418 Arguments and temporary variables: aSymbol: #public aFileStream: a WriteStream moveSource: false fileIndex: 0 selectors: #(#description #compute #scriptName) Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#compute->DrGeoScript230911418>>#compute #descri...etc... format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScript230911418 classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil [ :heading | self fileOutCategory: heading on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScript230911418 class(ClassDescription)>>fileOutOn:moveSource:toFile: Receiver: DrGeoScript230911418 Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 heading: #public Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#compute->DrGeoScript230911418>>#compute #descri...etc... format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScript230911418 classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil Array(SequenceableCollection)>>do: Receiver: #(#public #private) Arguments and temporary variables: aBlock: [ :heading | self fileOutCategory: heading on: aFileStream moveSour...etc... index: 1 Receiver's instance variables: #(#public #private) DrGeoScript230911418 class(ClassDescription)>>fileOutOn:moveSource:toFile: Receiver: DrGeoScript230911418 Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#compute->DrGeoScript230911418>>#compute #descri...etc... format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScript230911418 classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil DrGeoScript230911418 class(Class)>>fileOutOn:moveSource:toFile:initializing: Receiver: DrGeoScript230911418 Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 aBool: true Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#compute->DrGeoScript230911418>>#compute #descri...etc... format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScript230911418 classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil DrGeoScript230911418 class(Class)>>fileOutOn:moveSource:toFile: Receiver: DrGeoScript230911418 Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#compute->DrGeoScript230911418>>#compute #descri...etc... format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScript230911418 classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil DrGeoScript230911418 class(Class)>>fileOut Receiver: DrGeoScript230911418 Arguments and temporary variables: internalStream: a WriteStream Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#compute->DrGeoScript230911418>>#compute #descri...etc... format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScript230911418 classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil [ :class | class theNonMetaClass fileOut ] in NautilusUI(AbstractTool)>>fileOutClasses: Receiver: a NautilusUI Arguments and temporary variables: aCollection: {DrGeoScript230911418} class: DrGeoScript230911418 Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: nil cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript230911418->true ) list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: nil sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a ClassOrMethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget [ :element | aBlock value: element. bar increment ] in [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: Receiver: a NautilusUI Arguments and temporary variables: aBlock: [ :class | class theNonMetaClass fileOut ] aCollection: {DrGeoScript230911418} aString: 'Filing out classes...' job: a Job bar: a Job element: DrGeoScript230911418 Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: nil cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript230911418->true ) list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: nil sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a ClassOrMethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget Array(SequenceableCollection)>>do: Receiver: {DrGeoScript230911418} Arguments and temporary variables: aBlock: [ :element | aBlock value: element. bar increment ] index: 1 Receiver's instance variables: {DrGeoScript230911418} [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: Receiver: a NautilusUI Arguments and temporary variables: aBlock: [ :class | class theNonMetaClass fileOut ] aCollection: {DrGeoScript230911418} aString: 'Filing out classes...' job: a Job bar: a Job Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: nil cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript230911418->true ) list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: nil sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a ClassOrMethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget BlockClosure>>cull: Receiver: [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] Arguments and temporary variables: anArg: a Job Receiver's instance variables: outerContext: NautilusUI(AbstractTool)>>do:on:displaying: startpc: 55 numArgs: 1 [ result := block cull: self ] in [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run Receiver: a Job Arguments and temporary variables: result: nil Receiver's instance variables: block: [ :bar | aCollection do: [ :element | aBlock value: element. bar ...etc... currentValue: 0 min: 0 max: 1 title: 'Filing out classes...' children: an OrderedCollection() isRunning: true parent: nil process: a Process in nil BlockClosure>>on:do: Receiver: [ result := block cull: self ] Arguments and temporary variables: exception: JobNotification handlerAction: [ :notification | notification handle: self ] handlerActive: true Receiver's instance variables: outerContext: [ self prepareForRunning. [ result := block cull: self ] on: Jo...etc... startpc: 57 numArgs: 0 [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run Receiver: a Job Arguments and temporary variables: result: nil Receiver's instance variables: block: [ :bar | aCollection do: [ :element | aBlock value: element. bar ...etc... currentValue: 0 min: 0 max: 1 title: 'Filing out classes...' children: an OrderedCollection() isRunning: true parent: nil process: a Process in nil BlockClosure>>ensure: Receiver: [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :not...etc... Arguments and temporary variables: aBlock: [ self cleanupAfterRunning ] complete: nil returnValue: nil Receiver's instance variables: outerContext: Job>>run startpc: 49 numArgs: 0 Job>>run Receiver: a Job Arguments and temporary variables: result: nil Receiver's instance variables: block: [ :bar | aCollection do: [ :element | aBlock value: element. bar ...etc... currentValue: 0 min: 0 max: 1 title: 'Filing out classes...' children: an OrderedCollection() isRunning: true parent: nil process: a Process in nil NautilusUI(AbstractTool)>>do:on:displaying: Receiver: a NautilusUI Arguments and temporary variables: aBlock: [ :class | class theNonMetaClass fileOut ] aCollection: {DrGeoScript230911418} aString: 'Filing out classes...' job: a Job Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: nil cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript230911418->true ) list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: nil sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a ClassOrMethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget NautilusUI(AbstractTool)>>fileOutClasses: Receiver: a NautilusUI Arguments and temporary variables: aCollection: {DrGeoScript230911418} Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: nil cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript230911418->true ) list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: nil sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a ClassOrMethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget NautilusUI(AbstractNautilusUI)>>fileOutClass Receiver: a NautilusUI Arguments and temporary variables: Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: nil cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript230911418->true ) list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: nil sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a ClassOrMethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget [ target fileOutClass ] in AbstractNautilusUI class>>classesMenu: Receiver: AbstractNautilusUI Arguments and temporary variables: aBuilder: a PragmaMenuAndShortcutRegistration target: a NautilusUI Receiver's instance variables: superclass: AbstractTool methodDict: a MethodDictionary(size 430) format: 180 layout: a FixedLayout instanceVariables: #(#model #window #hierarchyClass #cachedHierarchy #sourceTex...etc... organization: a ClassOrganization subclasses: {NautilusUI} name: #AbstractNautilusUI classPool: a Dictionary(#ClassesIconsCache->a WeakIdentityKeyDictionary(size 46...etc... sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #Nautilus traitComposition: {} localSelectors: nil BlockClosure>>cull: Receiver: [ target fileOutClass ] Arguments and temporary variables: anArg: a NautilusUI Receiver's instance variables: outerContext: AbstractNautilusUI class>>classesMenu: startpc: 746 numArgs: 0 [ | selArgCount | "show cursor in case item opens a new MVC window" (selArgCount := selector numArgs) = 0 ifTrue: [ target perform: selector ] ifFalse: [ selArgCount = arguments size ifTrue: [ target perform: selector withArguments: arguments ] ifFalse: [ target perform: selector withArguments: (arguments copyWith: evt) ] ]. self changed ] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Receiver: a ToggleMenuItemMorph(958922752)'File Out' Arguments and temporary variables: evt: [(1432@809) mouseUp 3086806 nil] w: a WorldMorph(511705088) [world] selArgCount: 1 Receiver's instance variables: bounds: (1335.0@805.0) corner: (1528.0@821.0) owner: a MenuMorph(240123904) submorphs: #() fullBounds: (1335.0@805.0) corner: (1528.0@821.0) color: Color black extension: a MorphExtension (988282880) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil BlockClosure>>ensure: Receiver: [ | selArgCount | "show cursor in case item opens a new MVC window" (selArgCount := selec...etc... Arguments and temporary variables: aBlock: [ oldcursor show ] complete: nil returnValue: nil Receiver's instance variables: outerContext: ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: startpc: 134 numArgs: 0 CursorWithMask(Cursor)>>showWhile: Receiver: ((CursorWithMask extent: (16@16) depth: 1 fromArray: #( 2r0 2r100000000000000000000...etc... Arguments and temporary variables: aBlock: [ | selArgCount | "show cursor in case item opens a new MVC window" (s...etc... oldcursor: ((CursorWithMask extent: (16@16) depth: 1 fromArray: #( 2r0 2...etc... Receiver's instance variables: bits: a Bitmap of length 16 width: 16 height: 16 depth: 1 offset: (-1@ -1) maskForm: Form(16x16x1) ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Receiver: a ToggleMenuItemMorph(958922752)'File Out' Arguments and temporary variables: evt: [(1432@809) mouseUp 3086806 nil] w: a WorldMorph(511705088) [world] Receiver's instance variables: bounds: (1335.0@805.0) corner: (1528.0@821.0) owner: a MenuMorph(240123904) submorphs: #() fullBounds: (1335.0@805.0) corner: (1528.0@821.0) color: Color black extension: a MorphExtension (988282880) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil ToggleMenuItemMorph(MenuItemMorph)>>mouseUp: Receiver: a ToggleMenuItemMorph(958922752)'File Out' Arguments and temporary variables: evt: [(1432@809) mouseUp 3086806 nil] Receiver's instance variables: bounds: (1335.0@805.0) corner: (1528.0@821.0) owner: a MenuMorph(240123904) submorphs: #() fullBounds: (1335.0@805.0) corner: (1528.0@821.0) color: Color black extension: a MorphExtension (988282880) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp: Receiver: a ToggleMenuItemMorph(958922752)'File Out' Arguments and temporary variables: anEvent: [(1432@809) mouseUp 3086806 nil] Receiver's instance variables: bounds: (1335.0@805.0) corner: (1528.0@821.0) owner: a MenuMorph(240123904) submorphs: #() fullBounds: (1335.0@805.0) corner: (1528.0@821.0) color: Color black extension: a MorphExtension (988282880) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil MouseButtonEvent>>sentTo: Receiver: [(1432@809) mouseUp 3086806 nil] Arguments and temporary variables: anObject: a ToggleMenuItemMorph(958922752)'File Out' Receiver's instance variables: timeStamp: 3086806 source: a HandMorph(760479744) windowIndex: nil type: #mouseUp buttons: 0 position: (1432@809) handler: nil wasHandled: true whichButton: 4 --- The full stack --- UTF8TextConverter>>errorMalformedInput UTF8TextConverter>>nextFromStream: MultiByteFileStream>>next MultiByteFileStream(PositionableStream)>>oldBack MultiByteFileStream(PositionableStream)>>oldPeekBack MultiByteFileStream(PositionableStream)>>backChunk WriteStream(PositionableStream)>>copyPreamble:from:at: DrGeoScript230911418 class(ClassDescription)>>printMethodChunk:withPreamble:on:moveSource:toFile: [ :sel | self printMethodChunk: sel withPreamble: true on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScript230911418 class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: Array(SequenceableCollection)>>do: DrGeoScript230911418 class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: [ :heading | self fileOutCategory: heading on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScript230911418 class(ClassDescription)>>fileOutOn:moveSource:toFile: Array(SequenceableCollection)>>do: DrGeoScript230911418 class(ClassDescription)>>fileOutOn:moveSource:toFile: DrGeoScript230911418 class(Class)>>fileOutOn:moveSource:toFile:initializing: DrGeoScript230911418 class(Class)>>fileOutOn:moveSource:toFile: DrGeoScript230911418 class(Class)>>fileOut [ :class | class theNonMetaClass fileOut ] in NautilusUI(AbstractTool)>>fileOutClasses: [ :element | aBlock value: element. bar increment ] in [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: Array(SequenceableCollection)>>do: [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: BlockClosure>>cull: [ result := block cull: self ] in [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run BlockClosure>>on:do: [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run BlockClosure>>ensure: Job>>run NautilusUI(AbstractTool)>>do:on:displaying: NautilusUI(AbstractTool)>>fileOutClasses: NautilusUI(AbstractNautilusUI)>>fileOutClass [ target fileOutClass ] in AbstractNautilusUI class>>classesMenu: BlockClosure>>cull: [ | selArgCount | "show cursor in case item opens a new MVC window" (selArgCount := selector numArgs) = 0 ifTrue: [ target perform: selector ] ifFalse: [ selArgCount = arguments size ifTrue: [ target perform: selector withArguments: arguments ] ifFalse: [ target perform: selector withArguments: (arguments copyWith: evt) ] ]. self changed ] 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: [ ActiveHand := self. ActiveEvent := anEvent. result := focusHolder handleFocusEvent: (anEvent transformedBy: (focusHolder transformedFrom: self)) ] in HandMorph>>sendFocusEvent:to:clear: BlockClosure>>on:do: WorldMorph(PasteUpMorph)>>becomeActiveDuring: HandMorph>>sendFocusEvent:to:clear: HandMorph>>sendEvent:focus:clear: HandMorph>>sendMouseEvent: HandMorph>>handleEvent: HandMorph>>processEvents [ :h | ActiveHand := h. h processEvents. ActiveHand := nil ] in WorldState>>doOneCycleNowFor: Array(SequenceableCollection)>>do: WorldState>>handsDo: WorldState>>doOneCycleNowFor: WorldState>>doOneCycleFor: WorldMorph>>doOneCycle [ World doOneCycle. Processor yield. false ] in MorphicUIManager>>spawnNewProcess [ self value. Processor terminateActive ] in BlockClosure>>newProcess ------------------------------------------------------------------------------- THERE_BE_DRAGONS_HERE ZnInvalidUTF8: Invalid utf8 input detected 12 November 2014 10:10:52.420078 am VM: unix - i686 - linux-gnu - NBCoInterpreter NativeBoost-CogPlugin-EstebanLorenzano.20 uuid: cf2aeeee-897d-48fd-8251-6789dd21d958 Jun 14 2014 NBCogit NativeBoost-CogPlugin-EstebanLorenzano.20 uuid: cf2aeeee-897d-48fd-8251-6789dd21d958 Jun 14 2014 https://github.com/pharo-project/pharo-vm.git Commit: 0e8bbfbaeb03237fa6bb63ba834773fab18ca307 Date: 2014-06-14 12:20:21 -0300 By: Esteban Lorenzano Jenkins build #14833 Image: Pharo3.0 [Latest update: #30858] UTF8TextConverter>>errorMalformedInput Receiver: an UTF8TextConverter Arguments and temporary variables: Receiver's instance variables: latin1Map: #[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...etc... latin1Encodings: #(nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil ...etc... UTF8TextConverter>>nextFromStream: Receiver: an UTF8TextConverter Arguments and temporary variables: aStream: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-...etc... character1: $������ value1: 169 character2: $' value2: 39 unicode: nil character3: $! value3: 33 character4: nil value4: nil Receiver's instance variables: latin1Map: #[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...etc... latin1Encodings: #(nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil ...etc... MultiByteFileStream>>next Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: char: nil secondChar: nil state: nil Receiver's instance variables: MultiByteFileStream(PositionableStream)>>oldBack Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: Receiver's instance variables: MultiByteFileStream(PositionableStream)>>oldPeekBack Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: element: nil Receiver's instance variables: MultiByteFileStream(PositionableStream)>>backChunk Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: terminator: $! out: a WriteStream ch: $! Receiver's instance variables: WriteStream(PositionableStream)>>copyPreamble:from:at: Receiver: a WriteStream Arguments and temporary variables: preamble: 'DrGeoScriptTest methodsFor: ''as yet unclassified''' aStream: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-...etc... pos: 37917228 terminator: $! last50: nil stamp: nil i: nil Receiver's instance variables: collection: '''From Pharo3.0 of 18 March 2013 [Latest update: #30858] on 12 Nov...etc... position: 302 readLimit: 0 writeLimit: 376 DrGeoScriptTest class(ClassDescription)>>printMethodChunk:withPreamble:on:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: selector: #scriptName doPreamble: true outStream: a WriteStream moveSource: false fileIndex: 0 preamble: 'DrGeoScriptTest methodsFor: ''as yet unclassified''' method: DrGeoScriptTest>>#scriptName oldPos: 37917228 newPos: nil sourceFile: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/D...etc... endPos: nil Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil [ :sel | self printMethodChunk: sel withPreamble: true on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aSymbol: #'as yet unclassified' aFileStream: a WriteStream moveSource: false fileIndex: 0 selectors: #(#scriptName) sel: #scriptName Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil Array(SequenceableCollection)>>do: Receiver: #(#scriptName) Arguments and temporary variables: aBlock: [ :sel | self printMethodChunk: sel withPreamble: true on: aFileStr...etc... index: 1 Receiver's instance variables: #(#scriptName) DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aSymbol: #'as yet unclassified' aFileStream: a WriteStream moveSource: false fileIndex: 0 selectors: #(#scriptName) Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil [ :heading | self fileOutCategory: heading on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 heading: #'as yet unclassified' Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil Array(SequenceableCollection)>>do: Receiver: #(#'as yet unclassified') Arguments and temporary variables: aBlock: [ :heading | self fileOutCategory: heading on: aFileStream moveSour...etc... index: 1 Receiver's instance variables: #(#'as yet unclassified') DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile:initializing: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 aBool: true Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil DrGeoScriptTest class(Class)>>fileOut Receiver: DrGeoScriptTest Arguments and temporary variables: internalStream: a WriteStream Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil [ :class | class theNonMetaClass fileOut ] in NautilusUI(AbstractTool)>>fileOutClasses: Receiver: a NautilusUI Arguments and temporary variables: aCollection: {DrGeoScriptTest} class: DrGeoScriptTest Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScriptTest->true ) list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget [ :element | aBlock value: element. bar increment ] in [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: Receiver: a NautilusUI Arguments and temporary variables: aBlock: [ :class | class theNonMetaClass fileOut ] aCollection: {DrGeoScriptTest} aString: 'Filing out classes...' job: a Job bar: a Job element: DrGeoScriptTest Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScriptTest->true ) list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget Array(SequenceableCollection)>>do: Receiver: {DrGeoScriptTest} Arguments and temporary variables: aBlock: [ :element | aBlock value: element. bar increment ] index: 1 Receiver's instance variables: {DrGeoScriptTest} [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: Receiver: a NautilusUI Arguments and temporary variables: aBlock: [ :class | class theNonMetaClass fileOut ] aCollection: {DrGeoScriptTest} aString: 'Filing out classes...' job: a Job bar: a Job Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScriptTest->true ) list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget BlockClosure>>cull: Receiver: [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] Arguments and temporary variables: anArg: a Job Receiver's instance variables: outerContext: NautilusUI(AbstractTool)>>do:on:displaying: startpc: 55 numArgs: 1 [ result := block cull: self ] in [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run Receiver: a Job Arguments and temporary variables: result: nil Receiver's instance variables: block: [ :bar | aCollection do: [ :element | aBlock value: element. bar ...etc... currentValue: 0 min: 0 max: 1 title: 'Filing out classes...' children: an OrderedCollection() isRunning: true parent: nil process: a Process in nil BlockClosure>>on:do: Receiver: [ result := block cull: self ] Arguments and temporary variables: exception: JobNotification handlerAction: [ :notification | notification handle: self ] handlerActive: true Receiver's instance variables: outerContext: [ self prepareForRunning. [ result := block cull: self ] on: Jo...etc... startpc: 57 numArgs: 0 [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run Receiver: a Job Arguments and temporary variables: result: nil Receiver's instance variables: block: [ :bar | aCollection do: [ :element | aBlock value: element. bar ...etc... currentValue: 0 min: 0 max: 1 title: 'Filing out classes...' children: an OrderedCollection() isRunning: true parent: nil process: a Process in nil BlockClosure>>ensure: Receiver: [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :not...etc... Arguments and temporary variables: aBlock: [ self cleanupAfterRunning ] complete: nil returnValue: nil Receiver's instance variables: outerContext: Job>>run startpc: 49 numArgs: 0 Job>>run Receiver: a Job Arguments and temporary variables: result: nil Receiver's instance variables: block: [ :bar | aCollection do: [ :element | aBlock value: element. bar ...etc... currentValue: 0 min: 0 max: 1 title: 'Filing out classes...' children: an OrderedCollection() isRunning: true parent: nil process: a Process in nil NautilusUI(AbstractTool)>>do:on:displaying: Receiver: a NautilusUI Arguments and temporary variables: aBlock: [ :class | class theNonMetaClass fileOut ] aCollection: {DrGeoScriptTest} aString: 'Filing out classes...' job: a Job Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScriptTest->true ) list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget NautilusUI(AbstractTool)>>fileOutClasses: Receiver: a NautilusUI Arguments and temporary variables: aCollection: {DrGeoScriptTest} Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScriptTest->true ) list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget NautilusUI(AbstractNautilusUI)>>fileOutClass Receiver: a NautilusUI Arguments and temporary variables: Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScriptTest->true ) list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget [ target fileOutClass ] in AbstractNautilusUI class>>classesMenu: Receiver: AbstractNautilusUI Arguments and temporary variables: aBuilder: a PragmaMenuAndShortcutRegistration target: a NautilusUI Receiver's instance variables: superclass: AbstractTool methodDict: a MethodDictionary(size 430) format: 180 layout: a FixedLayout instanceVariables: #(#model #window #hierarchyClass #cachedHierarchy #sourceTex...etc... organization: a ClassOrganization subclasses: {NautilusUI} name: #AbstractNautilusUI classPool: a Dictionary(#ClassesIconsCache->a WeakIdentityKeyDictionary(size 46...etc... sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #Nautilus traitComposition: {} localSelectors: nil BlockClosure>>cull: Receiver: [ target fileOutClass ] Arguments and temporary variables: anArg: a NautilusUI Receiver's instance variables: outerContext: AbstractNautilusUI class>>classesMenu: startpc: 746 numArgs: 0 [ | selArgCount | "show cursor in case item opens a new MVC window" (selArgCount := selector numArgs) = 0 ifTrue: [ target perform: selector ] ifFalse: [ selArgCount = arguments size ifTrue: [ target perform: selector withArguments: arguments ] ifFalse: [ target perform: selector withArguments: (arguments copyWith: evt) ] ]. self changed ] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Receiver: a ToggleMenuItemMorph(308281344)'File Out' Arguments and temporary variables: evt: [(663@859) mouseUp 3449006 nil] w: a WorldMorph(511705088) [world] selArgCount: 1 Receiver's instance variables: bounds: (576.0@851.0) corner: (769.0@867.0) owner: a MenuMorph(304611328) submorphs: #() fullBounds: (576.0@851.0) corner: (769.0@867.0) color: Color black extension: a MorphExtension (337641472) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil BlockClosure>>ensure: Receiver: [ | selArgCount | "show cursor in case item opens a new MVC window" (selArgCount := selec...etc... Arguments and temporary variables: aBlock: [ oldcursor show ] complete: nil returnValue: nil Receiver's instance variables: outerContext: ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: startpc: 134 numArgs: 0 CursorWithMask(Cursor)>>showWhile: Receiver: ((CursorWithMask extent: (16@16) depth: 1 fromArray: #( 2r0 2r100000000000000000000...etc... Arguments and temporary variables: aBlock: [ | selArgCount | "show cursor in case item opens a new MVC window" (s...etc... oldcursor: ((CursorWithMask extent: (16@16) depth: 1 fromArray: #( 2r0 2...etc... Receiver's instance variables: bits: a Bitmap of length 16 width: 16 height: 16 depth: 1 offset: (-1@ -1) maskForm: Form(16x16x1) ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Receiver: a ToggleMenuItemMorph(308281344)'File Out' Arguments and temporary variables: evt: [(663@859) mouseUp 3449006 nil] w: a WorldMorph(511705088) [world] Receiver's instance variables: bounds: (576.0@851.0) corner: (769.0@867.0) owner: a MenuMorph(304611328) submorphs: #() fullBounds: (576.0@851.0) corner: (769.0@867.0) color: Color black extension: a MorphExtension (337641472) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil ToggleMenuItemMorph(MenuItemMorph)>>mouseUp: Receiver: a ToggleMenuItemMorph(308281344)'File Out' Arguments and temporary variables: evt: [(663@859) mouseUp 3449006 nil] Receiver's instance variables: bounds: (576.0@851.0) corner: (769.0@867.0) owner: a MenuMorph(304611328) submorphs: #() fullBounds: (576.0@851.0) corner: (769.0@867.0) color: Color black extension: a MorphExtension (337641472) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp: Receiver: a ToggleMenuItemMorph(308281344)'File Out' Arguments and temporary variables: anEvent: [(663@859) mouseUp 3449006 nil] Receiver's instance variables: bounds: (576.0@851.0) corner: (769.0@867.0) owner: a MenuMorph(304611328) submorphs: #() fullBounds: (576.0@851.0) corner: (769.0@867.0) color: Color black extension: a MorphExtension (337641472) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil MouseButtonEvent>>sentTo: Receiver: [(663@859) mouseUp 3449006 nil] Arguments and temporary variables: anObject: a ToggleMenuItemMorph(308281344)'File Out' Receiver's instance variables: timeStamp: 3449006 source: a HandMorph(760479744) windowIndex: nil type: #mouseUp buttons: 0 position: (663@859) handler: nil wasHandled: true whichButton: 4 --- The full stack --- UTF8TextConverter>>errorMalformedInput UTF8TextConverter>>nextFromStream: MultiByteFileStream>>next MultiByteFileStream(PositionableStream)>>oldBack MultiByteFileStream(PositionableStream)>>oldPeekBack MultiByteFileStream(PositionableStream)>>backChunk WriteStream(PositionableStream)>>copyPreamble:from:at: DrGeoScriptTest class(ClassDescription)>>printMethodChunk:withPreamble:on:moveSource:toFile: [ :sel | self printMethodChunk: sel withPreamble: true on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: Array(SequenceableCollection)>>do: DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: [ :heading | self fileOutCategory: heading on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: Array(SequenceableCollection)>>do: DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile:initializing: DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile: DrGeoScriptTest class(Class)>>fileOut [ :class | class theNonMetaClass fileOut ] in NautilusUI(AbstractTool)>>fileOutClasses: [ :element | aBlock value: element. bar increment ] in [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: Array(SequenceableCollection)>>do: [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: BlockClosure>>cull: [ result := block cull: self ] in [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run BlockClosure>>on:do: [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run BlockClosure>>ensure: Job>>run NautilusUI(AbstractTool)>>do:on:displaying: NautilusUI(AbstractTool)>>fileOutClasses: NautilusUI(AbstractNautilusUI)>>fileOutClass [ target fileOutClass ] in AbstractNautilusUI class>>classesMenu: BlockClosure>>cull: [ | selArgCount | "show cursor in case item opens a new MVC window" (selArgCount := selector numArgs) = 0 ifTrue: [ target perform: selector ] ifFalse: [ selArgCount = arguments size ifTrue: [ target perform: selector withArguments: arguments ] ifFalse: [ target perform: selector withArguments: (arguments copyWith: evt) ] ]. self changed ] 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: [ ActiveHand := self. ActiveEvent := anEvent. result := focusHolder handleFocusEvent: (anEvent transformedBy: (focusHolder transformedFrom: self)) ] in HandMorph>>sendFocusEvent:to:clear: BlockClosure>>on:do: WorldMorph(PasteUpMorph)>>becomeActiveDuring: HandMorph>>sendFocusEvent:to:clear: HandMorph>>sendEvent:focus:clear: HandMorph>>sendMouseEvent: HandMorph>>handleEvent: HandMorph>>processEvents [ :h | ActiveHand := h. h processEvents. ActiveHand := nil ] in WorldState>>doOneCycleNowFor: Array(SequenceableCollection)>>do: WorldState>>handsDo: WorldState>>doOneCycleNowFor: WorldState>>doOneCycleFor: WorldMorph>>doOneCycle [ World doOneCycle. Processor yield. false ] in MorphicUIManager>>spawnNewProcess [ self value. Processor terminateActive ] in BlockClosure>>newProcess ------------------------------------------------------------------------------- THERE_BE_DRAGONS_HERE ZnInvalidUTF8: Invalid utf8 input detected 12 November 2014 10:11:09.058489 am VM: unix - i686 - linux-gnu - NBCoInterpreter NativeBoost-CogPlugin-EstebanLorenzano.20 uuid: cf2aeeee-897d-48fd-8251-6789dd21d958 Jun 14 2014 NBCogit NativeBoost-CogPlugin-EstebanLorenzano.20 uuid: cf2aeeee-897d-48fd-8251-6789dd21d958 Jun 14 2014 https://github.com/pharo-project/pharo-vm.git Commit: 0e8bbfbaeb03237fa6bb63ba834773fab18ca307 Date: 2014-06-14 12:20:21 -0300 By: Esteban Lorenzano Jenkins build #14833 Image: Pharo3.0 [Latest update: #30858] UTF8TextConverter>>errorMalformedInput Receiver: an UTF8TextConverter Arguments and temporary variables: Receiver's instance variables: latin1Map: #[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...etc... latin1Encodings: #(nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil ...etc... UTF8TextConverter>>nextFromStream: Receiver: an UTF8TextConverter Arguments and temporary variables: aStream: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-...etc... character1: $������ value1: 169 character2: $' value2: 39 unicode: nil character3: $! value3: 33 character4: nil value4: nil Receiver's instance variables: latin1Map: #[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...etc... latin1Encodings: #(nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil ...etc... MultiByteFileStream>>next Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: char: nil secondChar: nil state: nil Receiver's instance variables: MultiByteFileStream(PositionableStream)>>oldBack Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: Receiver's instance variables: MultiByteFileStream(PositionableStream)>>oldPeekBack Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: element: nil Receiver's instance variables: MultiByteFileStream(PositionableStream)>>backChunk Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: terminator: $! out: a WriteStream ch: $! Receiver's instance variables: WriteStream(PositionableStream)>>copyPreamble:from:at: Receiver: a WriteStream Arguments and temporary variables: preamble: 'DrGeoScriptTest methodsFor: ''as yet unclassified''' aStream: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-...etc... pos: 37917365 terminator: $! last50: nil stamp: nil i: nil Receiver's instance variables: collection: '''From Pharo3.0 of 18 March 2013 [Latest update: #30858] on 12 Nov...etc... position: 302 readLimit: 0 writeLimit: 376 DrGeoScriptTest class(ClassDescription)>>printMethodChunk:withPreamble:on:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: selector: #scriptName doPreamble: true outStream: a WriteStream moveSource: false fileIndex: 0 preamble: 'DrGeoScriptTest methodsFor: ''as yet unclassified''' method: DrGeoScriptTest>>#scriptName oldPos: 37917365 newPos: nil sourceFile: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/D...etc... endPos: nil Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil [ :sel | self printMethodChunk: sel withPreamble: true on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aSymbol: #'as yet unclassified' aFileStream: a WriteStream moveSource: false fileIndex: 0 selectors: #(#scriptName) sel: #scriptName Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil Array(SequenceableCollection)>>do: Receiver: #(#scriptName) Arguments and temporary variables: aBlock: [ :sel | self printMethodChunk: sel withPreamble: true on: aFileStr...etc... index: 1 Receiver's instance variables: #(#scriptName) DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aSymbol: #'as yet unclassified' aFileStream: a WriteStream moveSource: false fileIndex: 0 selectors: #(#scriptName) Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil [ :heading | self fileOutCategory: heading on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 heading: #'as yet unclassified' Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil Array(SequenceableCollection)>>do: Receiver: #(#'as yet unclassified') Arguments and temporary variables: aBlock: [ :heading | self fileOutCategory: heading on: aFileStream moveSour...etc... index: 1 Receiver's instance variables: #(#'as yet unclassified') DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile:initializing: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 aBool: true Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil DrGeoScriptTest class(Class)>>fileOut Receiver: DrGeoScriptTest Arguments and temporary variables: internalStream: a WriteStream Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil [ :class | class theNonMetaClass fileOut ] in NautilusUI(AbstractTool)>>fileOutClasses: Receiver: a NautilusUI Arguments and temporary variables: aCollection: {DrGeoScriptTest} class: DrGeoScriptTest Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScriptTest->true ) list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget [ :element | aBlock value: element. bar increment ] in [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: Receiver: a NautilusUI Arguments and temporary variables: aBlock: [ :class | class theNonMetaClass fileOut ] aCollection: {DrGeoScriptTest} aString: 'Filing out classes...' job: a Job bar: a Job element: DrGeoScriptTest Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScriptTest->true ) list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget Array(SequenceableCollection)>>do: Receiver: {DrGeoScriptTest} Arguments and temporary variables: aBlock: [ :element | aBlock value: element. bar increment ] index: 1 Receiver's instance variables: {DrGeoScriptTest} [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: Receiver: a NautilusUI Arguments and temporary variables: aBlock: [ :class | class theNonMetaClass fileOut ] aCollection: {DrGeoScriptTest} aString: 'Filing out classes...' job: a Job bar: a Job Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScriptTest->true ) list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget BlockClosure>>cull: Receiver: [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] Arguments and temporary variables: anArg: a Job Receiver's instance variables: outerContext: NautilusUI(AbstractTool)>>do:on:displaying: startpc: 55 numArgs: 1 [ result := block cull: self ] in [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run Receiver: a Job Arguments and temporary variables: result: nil Receiver's instance variables: block: [ :bar | aCollection do: [ :element | aBlock value: element. bar ...etc... currentValue: 0 min: 0 max: 1 title: 'Filing out classes...' children: an OrderedCollection() isRunning: true parent: nil process: a Process in nil BlockClosure>>on:do: Receiver: [ result := block cull: self ] Arguments and temporary variables: exception: JobNotification handlerAction: [ :notification | notification handle: self ] handlerActive: true Receiver's instance variables: outerContext: [ self prepareForRunning. [ result := block cull: self ] on: Jo...etc... startpc: 57 numArgs: 0 [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run Receiver: a Job Arguments and temporary variables: result: nil Receiver's instance variables: block: [ :bar | aCollection do: [ :element | aBlock value: element. bar ...etc... currentValue: 0 min: 0 max: 1 title: 'Filing out classes...' children: an OrderedCollection() isRunning: true parent: nil process: a Process in nil BlockClosure>>ensure: Receiver: [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :not...etc... Arguments and temporary variables: aBlock: [ self cleanupAfterRunning ] complete: nil returnValue: nil Receiver's instance variables: outerContext: Job>>run startpc: 49 numArgs: 0 Job>>run Receiver: a Job Arguments and temporary variables: result: nil Receiver's instance variables: block: [ :bar | aCollection do: [ :element | aBlock value: element. bar ...etc... currentValue: 0 min: 0 max: 1 title: 'Filing out classes...' children: an OrderedCollection() isRunning: true parent: nil process: a Process in nil NautilusUI(AbstractTool)>>do:on:displaying: Receiver: a NautilusUI Arguments and temporary variables: aBlock: [ :class | class theNonMetaClass fileOut ] aCollection: {DrGeoScriptTest} aString: 'Filing out classes...' job: a Job Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScriptTest->true ) list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget NautilusUI(AbstractTool)>>fileOutClasses: Receiver: a NautilusUI Arguments and temporary variables: aCollection: {DrGeoScriptTest} Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScriptTest->true ) list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget NautilusUI(AbstractNautilusUI)>>fileOutClass Receiver: a NautilusUI Arguments and temporary variables: Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScriptTest->true ) list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget [ target fileOutClass ] in AbstractNautilusUI class>>classesMenu: Receiver: AbstractNautilusUI Arguments and temporary variables: aBuilder: a PragmaMenuAndShortcutRegistration target: a NautilusUI Receiver's instance variables: superclass: AbstractTool methodDict: a MethodDictionary(size 430) format: 180 layout: a FixedLayout instanceVariables: #(#model #window #hierarchyClass #cachedHierarchy #sourceTex...etc... organization: a ClassOrganization subclasses: {NautilusUI} name: #AbstractNautilusUI classPool: a Dictionary(#ClassesIconsCache->a WeakIdentityKeyDictionary(size 46...etc... sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #Nautilus traitComposition: {} localSelectors: nil BlockClosure>>cull: Receiver: [ target fileOutClass ] Arguments and temporary variables: anArg: a NautilusUI Receiver's instance variables: outerContext: AbstractNautilusUI class>>classesMenu: startpc: 746 numArgs: 0 [ | selArgCount | "show cursor in case item opens a new MVC window" (selArgCount := selector numArgs) = 0 ifTrue: [ target perform: selector ] ifFalse: [ selArgCount = arguments size ifTrue: [ target perform: selector withArguments: arguments ] ifFalse: [ target perform: selector withArguments: (arguments copyWith: evt) ] ]. self changed ] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Receiver: a ToggleMenuItemMorph(856948736)'File Out' Arguments and temporary variables: evt: [(725@928) mouseUp 3465630 nil] w: a WorldMorph(511705088) [world] selArgCount: 1 Receiver's instance variables: bounds: (636.0@922.0) corner: (829.0@938.0) owner: a MenuMorph(812908544) submorphs: #() fullBounds: (636.0@922.0) corner: (829.0@938.0) color: Color black extension: a MorphExtension (886308864) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil BlockClosure>>ensure: Receiver: [ | selArgCount | "show cursor in case item opens a new MVC window" (selArgCount := selec...etc... Arguments and temporary variables: aBlock: [ oldcursor show ] complete: nil returnValue: nil Receiver's instance variables: outerContext: ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: startpc: 134 numArgs: 0 CursorWithMask(Cursor)>>showWhile: Receiver: ((CursorWithMask extent: (16@16) depth: 1 fromArray: #( 2r0 2r100000000000000000000...etc... Arguments and temporary variables: aBlock: [ | selArgCount | "show cursor in case item opens a new MVC window" (s...etc... oldcursor: ((CursorWithMask extent: (16@16) depth: 1 fromArray: #( 2r0 2...etc... Receiver's instance variables: bits: a Bitmap of length 16 width: 16 height: 16 depth: 1 offset: (-1@ -1) maskForm: Form(16x16x1) ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Receiver: a ToggleMenuItemMorph(856948736)'File Out' Arguments and temporary variables: evt: [(725@928) mouseUp 3465630 nil] w: a WorldMorph(511705088) [world] Receiver's instance variables: bounds: (636.0@922.0) corner: (829.0@938.0) owner: a MenuMorph(812908544) submorphs: #() fullBounds: (636.0@922.0) corner: (829.0@938.0) color: Color black extension: a MorphExtension (886308864) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil ToggleMenuItemMorph(MenuItemMorph)>>mouseUp: Receiver: a ToggleMenuItemMorph(856948736)'File Out' Arguments and temporary variables: evt: [(725@928) mouseUp 3465630 nil] Receiver's instance variables: bounds: (636.0@922.0) corner: (829.0@938.0) owner: a MenuMorph(812908544) submorphs: #() fullBounds: (636.0@922.0) corner: (829.0@938.0) color: Color black extension: a MorphExtension (886308864) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp: Receiver: a ToggleMenuItemMorph(856948736)'File Out' Arguments and temporary variables: anEvent: [(725@928) mouseUp 3465630 nil] Receiver's instance variables: bounds: (636.0@922.0) corner: (829.0@938.0) owner: a MenuMorph(812908544) submorphs: #() fullBounds: (636.0@922.0) corner: (829.0@938.0) color: Color black extension: a MorphExtension (886308864) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil MouseButtonEvent>>sentTo: Receiver: [(725@928) mouseUp 3465630 nil] Arguments and temporary variables: anObject: a ToggleMenuItemMorph(856948736)'File Out' Receiver's instance variables: timeStamp: 3465630 source: a HandMorph(760479744) windowIndex: nil type: #mouseUp buttons: 0 position: (725@928) handler: nil wasHandled: true whichButton: 4 --- The full stack --- UTF8TextConverter>>errorMalformedInput UTF8TextConverter>>nextFromStream: MultiByteFileStream>>next MultiByteFileStream(PositionableStream)>>oldBack MultiByteFileStream(PositionableStream)>>oldPeekBack MultiByteFileStream(PositionableStream)>>backChunk WriteStream(PositionableStream)>>copyPreamble:from:at: DrGeoScriptTest class(ClassDescription)>>printMethodChunk:withPreamble:on:moveSource:toFile: [ :sel | self printMethodChunk: sel withPreamble: true on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: Array(SequenceableCollection)>>do: DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: [ :heading | self fileOutCategory: heading on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: Array(SequenceableCollection)>>do: DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile:initializing: DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile: DrGeoScriptTest class(Class)>>fileOut [ :class | class theNonMetaClass fileOut ] in NautilusUI(AbstractTool)>>fileOutClasses: [ :element | aBlock value: element. bar increment ] in [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: Array(SequenceableCollection)>>do: [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: BlockClosure>>cull: [ result := block cull: self ] in [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run BlockClosure>>on:do: [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run BlockClosure>>ensure: Job>>run NautilusUI(AbstractTool)>>do:on:displaying: NautilusUI(AbstractTool)>>fileOutClasses: NautilusUI(AbstractNautilusUI)>>fileOutClass [ target fileOutClass ] in AbstractNautilusUI class>>classesMenu: BlockClosure>>cull: [ | selArgCount | "show cursor in case item opens a new MVC window" (selArgCount := selector numArgs) = 0 ifTrue: [ target perform: selector ] ifFalse: [ selArgCount = arguments size ifTrue: [ target perform: selector withArguments: arguments ] ifFalse: [ target perform: selector withArguments: (arguments copyWith: evt) ] ]. self changed ] 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: [ ActiveHand := self. ActiveEvent := anEvent. result := focusHolder handleFocusEvent: (anEvent transformedBy: (focusHolder transformedFrom: self)) ] in HandMorph>>sendFocusEvent:to:clear: BlockClosure>>on:do: WorldMorph(PasteUpMorph)>>becomeActiveDuring: HandMorph>>sendFocusEvent:to:clear: HandMorph>>sendEvent:focus:clear: HandMorph>>sendMouseEvent: HandMorph>>handleEvent: HandMorph>>processEvents [ :h | ActiveHand := h. h processEvents. ActiveHand := nil ] in WorldState>>doOneCycleNowFor: Array(SequenceableCollection)>>do: WorldState>>handsDo: WorldState>>doOneCycleNowFor: WorldState>>doOneCycleFor: WorldMorph>>doOneCycle [ World doOneCycle. Processor yield. false ] in MorphicUIManager>>spawnNewProcess [ self value. Processor terminateActive ] in BlockClosure>>newProcess ------------------------------------------------------------------------------- THERE_BE_DRAGONS_HERE ZnInvalidUTF8: Invalid utf8 input detected 12 November 2014 10:11:49.041918 am VM: unix - i686 - linux-gnu - NBCoInterpreter NativeBoost-CogPlugin-EstebanLorenzano.20 uuid: cf2aeeee-897d-48fd-8251-6789dd21d958 Jun 14 2014 NBCogit NativeBoost-CogPlugin-EstebanLorenzano.20 uuid: cf2aeeee-897d-48fd-8251-6789dd21d958 Jun 14 2014 https://github.com/pharo-project/pharo-vm.git Commit: 0e8bbfbaeb03237fa6bb63ba834773fab18ca307 Date: 2014-06-14 12:20:21 -0300 By: Esteban Lorenzano Jenkins build #14833 Image: Pharo3.0 [Latest update: #30858] UTF8TextConverter>>errorMalformedInput Receiver: an UTF8TextConverter Arguments and temporary variables: Receiver's instance variables: latin1Map: #[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...etc... latin1Encodings: #(nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil ...etc... UTF8TextConverter>>nextFromStream: Receiver: an UTF8TextConverter Arguments and temporary variables: aStream: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-...etc... character1: $������ value1: 169 character2: $' value2: 39 unicode: nil character3: $! value3: 33 character4: nil value4: nil Receiver's instance variables: latin1Map: #[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...etc... latin1Encodings: #(nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil ...etc... MultiByteFileStream>>next Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: char: nil secondChar: nil state: nil Receiver's instance variables: MultiByteFileStream(PositionableStream)>>oldBack Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: Receiver's instance variables: MultiByteFileStream(PositionableStream)>>oldPeekBack Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: element: nil Receiver's instance variables: MultiByteFileStream(PositionableStream)>>backChunk Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: terminator: $! out: a WriteStream ch: $! Receiver's instance variables: WriteStream(PositionableStream)>>copyPreamble:from:at: Receiver: a WriteStream Arguments and temporary variables: preamble: 'DrGeoScriptTest methodsFor: ''as yet unclassified''' aStream: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-...etc... pos: 37917909 terminator: $! last50: nil stamp: nil i: nil Receiver's instance variables: collection: '''From Pharo3.0 of 18 March 2013 [Latest update: #30858] on 12 Nov...etc... position: 302 readLimit: 0 writeLimit: 376 DrGeoScriptTest class(ClassDescription)>>printMethodChunk:withPreamble:on:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: selector: #scriptName doPreamble: true outStream: a WriteStream moveSource: false fileIndex: 0 preamble: 'DrGeoScriptTest methodsFor: ''as yet unclassified''' method: DrGeoScriptTest>>#scriptName oldPos: 37917909 newPos: nil sourceFile: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/D...etc... endPos: nil Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil [ :sel | self printMethodChunk: sel withPreamble: true on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aSymbol: #'as yet unclassified' aFileStream: a WriteStream moveSource: false fileIndex: 0 selectors: #(#scriptName) sel: #scriptName Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil Array(SequenceableCollection)>>do: Receiver: #(#scriptName) Arguments and temporary variables: aBlock: [ :sel | self printMethodChunk: sel withPreamble: true on: aFileStr...etc... index: 1 Receiver's instance variables: #(#scriptName) DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aSymbol: #'as yet unclassified' aFileStream: a WriteStream moveSource: false fileIndex: 0 selectors: #(#scriptName) Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil [ :heading | self fileOutCategory: heading on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 heading: #'as yet unclassified' Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil Array(SequenceableCollection)>>do: Receiver: #(#'as yet unclassified') Arguments and temporary variables: aBlock: [ :heading | self fileOutCategory: heading on: aFileStream moveSour...etc... index: 1 Receiver's instance variables: #(#'as yet unclassified') DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile:initializing: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 aBool: true Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil DrGeoScriptTest class(Class)>>fileOut Receiver: DrGeoScriptTest Arguments and temporary variables: internalStream: a WriteStream Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil [ :class | class theNonMetaClass fileOut ] in NautilusUI(AbstractTool)>>fileOutClasses: Receiver: a NautilusUI Arguments and temporary variables: aCollection: {DrGeoScriptTest} class: DrGeoScriptTest Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a ClassOrMethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget [ :element | aBlock value: element. bar increment ] in [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: Receiver: a NautilusUI Arguments and temporary variables: aBlock: [ :class | class theNonMetaClass fileOut ] aCollection: {DrGeoScriptTest} aString: 'Filing out classes...' job: a Job bar: a Job element: DrGeoScriptTest Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a ClassOrMethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget Array(SequenceableCollection)>>do: Receiver: {DrGeoScriptTest} Arguments and temporary variables: aBlock: [ :element | aBlock value: element. bar increment ] index: 1 Receiver's instance variables: {DrGeoScriptTest} [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: Receiver: a NautilusUI Arguments and temporary variables: aBlock: [ :class | class theNonMetaClass fileOut ] aCollection: {DrGeoScriptTest} aString: 'Filing out classes...' job: a Job bar: a Job Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a ClassOrMethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget BlockClosure>>cull: Receiver: [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] Arguments and temporary variables: anArg: a Job Receiver's instance variables: outerContext: NautilusUI(AbstractTool)>>do:on:displaying: startpc: 55 numArgs: 1 [ result := block cull: self ] in [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run Receiver: a Job Arguments and temporary variables: result: nil Receiver's instance variables: block: [ :bar | aCollection do: [ :element | aBlock value: element. bar ...etc... currentValue: 0 min: 0 max: 1 title: 'Filing out classes...' children: an OrderedCollection() isRunning: true parent: nil process: a Process in nil BlockClosure>>on:do: Receiver: [ result := block cull: self ] Arguments and temporary variables: exception: JobNotification handlerAction: [ :notification | notification handle: self ] handlerActive: true Receiver's instance variables: outerContext: [ self prepareForRunning. [ result := block cull: self ] on: Jo...etc... startpc: 57 numArgs: 0 [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run Receiver: a Job Arguments and temporary variables: result: nil Receiver's instance variables: block: [ :bar | aCollection do: [ :element | aBlock value: element. bar ...etc... currentValue: 0 min: 0 max: 1 title: 'Filing out classes...' children: an OrderedCollection() isRunning: true parent: nil process: a Process in nil BlockClosure>>ensure: Receiver: [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :not...etc... Arguments and temporary variables: aBlock: [ self cleanupAfterRunning ] complete: nil returnValue: nil Receiver's instance variables: outerContext: Job>>run startpc: 49 numArgs: 0 Job>>run Receiver: a Job Arguments and temporary variables: result: nil Receiver's instance variables: block: [ :bar | aCollection do: [ :element | aBlock value: element. bar ...etc... currentValue: 0 min: 0 max: 1 title: 'Filing out classes...' children: an OrderedCollection() isRunning: true parent: nil process: a Process in nil NautilusUI(AbstractTool)>>do:on:displaying: Receiver: a NautilusUI Arguments and temporary variables: aBlock: [ :class | class theNonMetaClass fileOut ] aCollection: {DrGeoScriptTest} aString: 'Filing out classes...' job: a Job Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a ClassOrMethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget NautilusUI(AbstractTool)>>fileOutClasses: Receiver: a NautilusUI Arguments and temporary variables: aCollection: {DrGeoScriptTest} Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a ClassOrMethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget NautilusUI(AbstractNautilusUI)>>fileOutClass Receiver: a NautilusUI Arguments and temporary variables: Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a ClassOrMethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget [ target fileOutClass ] in AbstractNautilusUI class>>classesMenu: Receiver: AbstractNautilusUI Arguments and temporary variables: aBuilder: a PragmaMenuAndShortcutRegistration target: a NautilusUI Receiver's instance variables: superclass: AbstractTool methodDict: a MethodDictionary(size 430) format: 180 layout: a FixedLayout instanceVariables: #(#model #window #hierarchyClass #cachedHierarchy #sourceTex...etc... organization: a ClassOrganization subclasses: {NautilusUI} name: #AbstractNautilusUI classPool: a Dictionary(#ClassesIconsCache->a WeakIdentityKeyDictionary(size 46...etc... sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #Nautilus traitComposition: {} localSelectors: nil BlockClosure>>cull: Receiver: [ target fileOutClass ] Arguments and temporary variables: anArg: a NautilusUI Receiver's instance variables: outerContext: AbstractNautilusUI class>>classesMenu: startpc: 746 numArgs: 0 [ | selArgCount | "show cursor in case item opens a new MVC window" (selArgCount := selector numArgs) = 0 ifTrue: [ target perform: selector ] ifFalse: [ selArgCount = arguments size ifTrue: [ target perform: selector withArguments: arguments ] ifFalse: [ target perform: selector withArguments: (arguments copyWith: evt) ] ]. self changed ] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Receiver: a ToggleMenuItemMorph(1021313024)'File Out' Arguments and temporary variables: evt: [(706@769) mouseUp 3505614 nil] w: a WorldMorph(511705088) [world] selArgCount: 1 Receiver's instance variables: bounds: (614.0@766.0) corner: (807.0@782.0) owner: a MenuMorph(783286272) submorphs: #() fullBounds: (614.0@766.0) corner: (807.0@782.0) color: Color black extension: a MorphExtension (1050673152) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil BlockClosure>>ensure: Receiver: [ | selArgCount | "show cursor in case item opens a new MVC window" (selArgCount := selec...etc... Arguments and temporary variables: aBlock: [ oldcursor show ] complete: nil returnValue: nil Receiver's instance variables: outerContext: ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: startpc: 134 numArgs: 0 CursorWithMask(Cursor)>>showWhile: Receiver: ((CursorWithMask extent: (16@16) depth: 1 fromArray: #( 2r0 2r100000000000000000000...etc... Arguments and temporary variables: aBlock: [ | selArgCount | "show cursor in case item opens a new MVC window" (s...etc... oldcursor: ((CursorWithMask extent: (16@16) depth: 1 fromArray: #( 2r0 2...etc... Receiver's instance variables: bits: a Bitmap of length 16 width: 16 height: 16 depth: 1 offset: (-1@ -1) maskForm: Form(16x16x1) ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Receiver: a ToggleMenuItemMorph(1021313024)'File Out' Arguments and temporary variables: evt: [(706@769) mouseUp 3505614 nil] w: a WorldMorph(511705088) [world] Receiver's instance variables: bounds: (614.0@766.0) corner: (807.0@782.0) owner: a MenuMorph(783286272) submorphs: #() fullBounds: (614.0@766.0) corner: (807.0@782.0) color: Color black extension: a MorphExtension (1050673152) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil ToggleMenuItemMorph(MenuItemMorph)>>mouseUp: Receiver: a ToggleMenuItemMorph(1021313024)'File Out' Arguments and temporary variables: evt: [(706@769) mouseUp 3505614 nil] Receiver's instance variables: bounds: (614.0@766.0) corner: (807.0@782.0) owner: a MenuMorph(783286272) submorphs: #() fullBounds: (614.0@766.0) corner: (807.0@782.0) color: Color black extension: a MorphExtension (1050673152) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp: Receiver: a ToggleMenuItemMorph(1021313024)'File Out' Arguments and temporary variables: anEvent: [(706@769) mouseUp 3505614 nil] Receiver's instance variables: bounds: (614.0@766.0) corner: (807.0@782.0) owner: a MenuMorph(783286272) submorphs: #() fullBounds: (614.0@766.0) corner: (807.0@782.0) color: Color black extension: a MorphExtension (1050673152) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil MouseButtonEvent>>sentTo: Receiver: [(706@769) mouseUp 3505614 nil] Arguments and temporary variables: anObject: a ToggleMenuItemMorph(1021313024)'File Out' Receiver's instance variables: timeStamp: 3505614 source: a HandMorph(760479744) windowIndex: nil type: #mouseUp buttons: 0 position: (706@769) handler: nil wasHandled: true whichButton: 4 --- The full stack --- UTF8TextConverter>>errorMalformedInput UTF8TextConverter>>nextFromStream: MultiByteFileStream>>next MultiByteFileStream(PositionableStream)>>oldBack MultiByteFileStream(PositionableStream)>>oldPeekBack MultiByteFileStream(PositionableStream)>>backChunk WriteStream(PositionableStream)>>copyPreamble:from:at: DrGeoScriptTest class(ClassDescription)>>printMethodChunk:withPreamble:on:moveSource:toFile: [ :sel | self printMethodChunk: sel withPreamble: true on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: Array(SequenceableCollection)>>do: DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: [ :heading | self fileOutCategory: heading on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: Array(SequenceableCollection)>>do: DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile:initializing: DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile: DrGeoScriptTest class(Class)>>fileOut [ :class | class theNonMetaClass fileOut ] in NautilusUI(AbstractTool)>>fileOutClasses: [ :element | aBlock value: element. bar increment ] in [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: Array(SequenceableCollection)>>do: [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: BlockClosure>>cull: [ result := block cull: self ] in [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run BlockClosure>>on:do: [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run BlockClosure>>ensure: Job>>run NautilusUI(AbstractTool)>>do:on:displaying: NautilusUI(AbstractTool)>>fileOutClasses: NautilusUI(AbstractNautilusUI)>>fileOutClass [ target fileOutClass ] in AbstractNautilusUI class>>classesMenu: BlockClosure>>cull: [ | selArgCount | "show cursor in case item opens a new MVC window" (selArgCount := selector numArgs) = 0 ifTrue: [ target perform: selector ] ifFalse: [ selArgCount = arguments size ifTrue: [ target perform: selector withArguments: arguments ] ifFalse: [ target perform: selector withArguments: (arguments copyWith: evt) ] ]. self changed ] 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: [ ActiveHand := self. ActiveEvent := anEvent. result := focusHolder handleFocusEvent: (anEvent transformedBy: (focusHolder transformedFrom: self)) ] in HandMorph>>sendFocusEvent:to:clear: BlockClosure>>on:do: WorldMorph(PasteUpMorph)>>becomeActiveDuring: HandMorph>>sendFocusEvent:to:clear: HandMorph>>sendEvent:focus:clear: HandMorph>>sendMouseEvent: HandMorph>>handleEvent: HandMorph>>processEvents [ :h | ActiveHand := h. h processEvents. ActiveHand := nil ] in WorldState>>doOneCycleNowFor: Array(SequenceableCollection)>>do: WorldState>>handsDo: WorldState>>doOneCycleNowFor: WorldState>>doOneCycleFor: WorldMorph>>doOneCycle [ World doOneCycle. Processor yield. false ] in MorphicUIManager>>spawnNewProcess [ self value. Processor terminateActive ] in BlockClosure>>newProcess ------------------------------------------------------------------------------- THERE_BE_DRAGONS_HERE ZnInvalidUTF8: Invalid utf8 input detected 12 November 2014 10:11:59.707178 am VM: unix - i686 - linux-gnu - NBCoInterpreter NativeBoost-CogPlugin-EstebanLorenzano.20 uuid: cf2aeeee-897d-48fd-8251-6789dd21d958 Jun 14 2014 NBCogit NativeBoost-CogPlugin-EstebanLorenzano.20 uuid: cf2aeeee-897d-48fd-8251-6789dd21d958 Jun 14 2014 https://github.com/pharo-project/pharo-vm.git Commit: 0e8bbfbaeb03237fa6bb63ba834773fab18ca307 Date: 2014-06-14 12:20:21 -0300 By: Esteban Lorenzano Jenkins build #14833 Image: Pharo3.0 [Latest update: #30858] UTF8TextConverter>>errorMalformedInput Receiver: an UTF8TextConverter Arguments and temporary variables: Receiver's instance variables: latin1Map: #[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...etc... latin1Encodings: #(nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil ...etc... UTF8TextConverter>>nextFromStream: Receiver: an UTF8TextConverter Arguments and temporary variables: aStream: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-...etc... character1: $������ value1: 169 character2: $' value2: 39 unicode: nil character3: $! value3: 33 character4: nil value4: nil Receiver's instance variables: latin1Map: #[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...etc... latin1Encodings: #(nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil ...etc... MultiByteFileStream>>next Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: char: nil secondChar: nil state: nil Receiver's instance variables: MultiByteFileStream(PositionableStream)>>oldBack Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: Receiver's instance variables: MultiByteFileStream(PositionableStream)>>oldPeekBack Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: element: nil Receiver's instance variables: MultiByteFileStream(PositionableStream)>>backChunk Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: terminator: $! out: a WriteStream ch: $! Receiver's instance variables: WriteStream(PositionableStream)>>copyPreamble:from:at: Receiver: a WriteStream Arguments and temporary variables: preamble: 'DrGeoScriptTest methodsFor: ''as yet unclassified''' aStream: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-...etc... pos: 37918046 terminator: $! last50: nil stamp: nil i: nil Receiver's instance variables: collection: '''From Pharo3.0 of 18 March 2013 [Latest update: #30858] on 12 Nov...etc... position: 302 readLimit: 0 writeLimit: 376 DrGeoScriptTest class(ClassDescription)>>printMethodChunk:withPreamble:on:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: selector: #scriptName doPreamble: true outStream: a WriteStream moveSource: false fileIndex: 0 preamble: 'DrGeoScriptTest methodsFor: ''as yet unclassified''' method: DrGeoScriptTest>>#scriptName oldPos: 37918046 newPos: nil sourceFile: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/D...etc... endPos: nil Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil [ :sel | self printMethodChunk: sel withPreamble: true on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aSymbol: #'as yet unclassified' aFileStream: a WriteStream moveSource: false fileIndex: 0 selectors: #(#scriptName) sel: #scriptName Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil Array(SequenceableCollection)>>do: Receiver: #(#scriptName) Arguments and temporary variables: aBlock: [ :sel | self printMethodChunk: sel withPreamble: true on: aFileStr...etc... index: 1 Receiver's instance variables: #(#scriptName) DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aSymbol: #'as yet unclassified' aFileStream: a WriteStream moveSource: false fileIndex: 0 selectors: #(#scriptName) Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil [ :heading | self fileOutCategory: heading on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 heading: #'as yet unclassified' Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil Array(SequenceableCollection)>>do: Receiver: #(#'as yet unclassified') Arguments and temporary variables: aBlock: [ :heading | self fileOutCategory: heading on: aFileStream moveSour...etc... index: 1 Receiver's instance variables: #(#'as yet unclassified') DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile:initializing: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 aBool: true Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil DrGeoScriptTest class(Class)>>fileOut Receiver: DrGeoScriptTest Arguments and temporary variables: internalStream: a WriteStream Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil [ :class | class theNonMetaClass fileOut ] in NautilusUI(AbstractTool)>>fileOutClasses: Receiver: a NautilusUI Arguments and temporary variables: aCollection: {DrGeoScriptTest} class: DrGeoScriptTest Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget [ :element | aBlock value: element. bar increment ] in [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: Receiver: a NautilusUI Arguments and temporary variables: aBlock: [ :class | class theNonMetaClass fileOut ] aCollection: {DrGeoScriptTest} aString: 'Filing out classes...' job: a Job bar: a Job element: DrGeoScriptTest Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget Array(SequenceableCollection)>>do: Receiver: {DrGeoScriptTest} Arguments and temporary variables: aBlock: [ :element | aBlock value: element. bar increment ] index: 1 Receiver's instance variables: {DrGeoScriptTest} [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: Receiver: a NautilusUI Arguments and temporary variables: aBlock: [ :class | class theNonMetaClass fileOut ] aCollection: {DrGeoScriptTest} aString: 'Filing out classes...' job: a Job bar: a Job Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget BlockClosure>>cull: Receiver: [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] Arguments and temporary variables: anArg: a Job Receiver's instance variables: outerContext: NautilusUI(AbstractTool)>>do:on:displaying: startpc: 55 numArgs: 1 [ result := block cull: self ] in [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run Receiver: a Job Arguments and temporary variables: result: nil Receiver's instance variables: block: [ :bar | aCollection do: [ :element | aBlock value: element. bar ...etc... currentValue: 0 min: 0 max: 1 title: 'Filing out classes...' children: an OrderedCollection() isRunning: true parent: nil process: a Process in nil BlockClosure>>on:do: Receiver: [ result := block cull: self ] Arguments and temporary variables: exception: JobNotification handlerAction: [ :notification | notification handle: self ] handlerActive: true Receiver's instance variables: outerContext: [ self prepareForRunning. [ result := block cull: self ] on: Jo...etc... startpc: 57 numArgs: 0 [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run Receiver: a Job Arguments and temporary variables: result: nil Receiver's instance variables: block: [ :bar | aCollection do: [ :element | aBlock value: element. bar ...etc... currentValue: 0 min: 0 max: 1 title: 'Filing out classes...' children: an OrderedCollection() isRunning: true parent: nil process: a Process in nil BlockClosure>>ensure: Receiver: [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :not...etc... Arguments and temporary variables: aBlock: [ self cleanupAfterRunning ] complete: nil returnValue: nil Receiver's instance variables: outerContext: Job>>run startpc: 49 numArgs: 0 Job>>run Receiver: a Job Arguments and temporary variables: result: nil Receiver's instance variables: block: [ :bar | aCollection do: [ :element | aBlock value: element. bar ...etc... currentValue: 0 min: 0 max: 1 title: 'Filing out classes...' children: an OrderedCollection() isRunning: true parent: nil process: a Process in nil NautilusUI(AbstractTool)>>do:on:displaying: Receiver: a NautilusUI Arguments and temporary variables: aBlock: [ :class | class theNonMetaClass fileOut ] aCollection: {DrGeoScriptTest} aString: 'Filing out classes...' job: a Job Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget NautilusUI(AbstractTool)>>fileOutClasses: Receiver: a NautilusUI Arguments and temporary variables: aCollection: {DrGeoScriptTest} Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget NautilusUI(AbstractNautilusUI)>>fileOutClass Receiver: a NautilusUI Arguments and temporary variables: Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget [ target fileOutClass ] in AbstractNautilusUI class>>classesMenu: Receiver: AbstractNautilusUI Arguments and temporary variables: aBuilder: a PragmaMenuAndShortcutRegistration target: a NautilusUI Receiver's instance variables: superclass: AbstractTool methodDict: a MethodDictionary(size 430) format: 180 layout: a FixedLayout instanceVariables: #(#model #window #hierarchyClass #cachedHierarchy #sourceTex...etc... organization: a ClassOrganization subclasses: {NautilusUI} name: #AbstractNautilusUI classPool: a Dictionary(#ClassesIconsCache->a WeakIdentityKeyDictionary(size 46...etc... sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #Nautilus traitComposition: {} localSelectors: nil BlockClosure>>cull: Receiver: [ target fileOutClass ] Arguments and temporary variables: anArg: a NautilusUI Receiver's instance variables: outerContext: AbstractNautilusUI class>>classesMenu: startpc: 746 numArgs: 0 [ | selArgCount | "show cursor in case item opens a new MVC window" (selArgCount := selector numArgs) = 0 ifTrue: [ target perform: selector ] ifFalse: [ selArgCount = arguments size ifTrue: [ target perform: selector withArguments: arguments ] ifFalse: [ target perform: selector withArguments: (arguments copyWith: evt) ] ]. self changed ] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Receiver: a ToggleMenuItemMorph(951320576)'File Out' Arguments and temporary variables: evt: [(699@763) mouseUp 3516294 nil] w: a WorldMorph(511705088) [world] selArgCount: 1 Receiver's instance variables: bounds: (587.0@763.0) corner: (780.0@779.0) owner: a MenuMorph(545783808) submorphs: #() fullBounds: (587.0@763.0) corner: (780.0@779.0) color: Color black extension: a MorphExtension (980680704) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil BlockClosure>>ensure: Receiver: [ | selArgCount | "show cursor in case item opens a new MVC window" (selArgCount := selec...etc... Arguments and temporary variables: aBlock: [ oldcursor show ] complete: nil returnValue: nil Receiver's instance variables: outerContext: ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: startpc: 134 numArgs: 0 CursorWithMask(Cursor)>>showWhile: Receiver: ((CursorWithMask extent: (16@16) depth: 1 fromArray: #( 2r0 2r100000000000000000000...etc... Arguments and temporary variables: aBlock: [ | selArgCount | "show cursor in case item opens a new MVC window" (s...etc... oldcursor: ((CursorWithMask extent: (16@16) depth: 1 fromArray: #( 2r0 2...etc... Receiver's instance variables: bits: a Bitmap of length 16 width: 16 height: 16 depth: 1 offset: (-1@ -1) maskForm: Form(16x16x1) ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Receiver: a ToggleMenuItemMorph(951320576)'File Out' Arguments and temporary variables: evt: [(699@763) mouseUp 3516294 nil] w: a WorldMorph(511705088) [world] Receiver's instance variables: bounds: (587.0@763.0) corner: (780.0@779.0) owner: a MenuMorph(545783808) submorphs: #() fullBounds: (587.0@763.0) corner: (780.0@779.0) color: Color black extension: a MorphExtension (980680704) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil ToggleMenuItemMorph(MenuItemMorph)>>mouseUp: Receiver: a ToggleMenuItemMorph(951320576)'File Out' Arguments and temporary variables: evt: [(699@763) mouseUp 3516294 nil] Receiver's instance variables: bounds: (587.0@763.0) corner: (780.0@779.0) owner: a MenuMorph(545783808) submorphs: #() fullBounds: (587.0@763.0) corner: (780.0@779.0) color: Color black extension: a MorphExtension (980680704) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp: Receiver: a ToggleMenuItemMorph(951320576)'File Out' Arguments and temporary variables: anEvent: [(699@763) mouseUp 3516294 nil] Receiver's instance variables: bounds: (587.0@763.0) corner: (780.0@779.0) owner: a MenuMorph(545783808) submorphs: #() fullBounds: (587.0@763.0) corner: (780.0@779.0) color: Color black extension: a MorphExtension (980680704) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil MouseButtonEvent>>sentTo: Receiver: [(699@763) mouseUp 3516294 nil] Arguments and temporary variables: anObject: a ToggleMenuItemMorph(951320576)'File Out' Receiver's instance variables: timeStamp: 3516294 source: a HandMorph(760479744) windowIndex: nil type: #mouseUp buttons: 0 position: (699@763) handler: nil wasHandled: true whichButton: 4 --- The full stack --- UTF8TextConverter>>errorMalformedInput UTF8TextConverter>>nextFromStream: MultiByteFileStream>>next MultiByteFileStream(PositionableStream)>>oldBack MultiByteFileStream(PositionableStream)>>oldPeekBack MultiByteFileStream(PositionableStream)>>backChunk WriteStream(PositionableStream)>>copyPreamble:from:at: DrGeoScriptTest class(ClassDescription)>>printMethodChunk:withPreamble:on:moveSource:toFile: [ :sel | self printMethodChunk: sel withPreamble: true on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: Array(SequenceableCollection)>>do: DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: [ :heading | self fileOutCategory: heading on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: Array(SequenceableCollection)>>do: DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile:initializing: DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile: DrGeoScriptTest class(Class)>>fileOut [ :class | class theNonMetaClass fileOut ] in NautilusUI(AbstractTool)>>fileOutClasses: [ :element | aBlock value: element. bar increment ] in [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: Array(SequenceableCollection)>>do: [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: BlockClosure>>cull: [ result := block cull: self ] in [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run BlockClosure>>on:do: [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run BlockClosure>>ensure: Job>>run NautilusUI(AbstractTool)>>do:on:displaying: NautilusUI(AbstractTool)>>fileOutClasses: NautilusUI(AbstractNautilusUI)>>fileOutClass [ target fileOutClass ] in AbstractNautilusUI class>>classesMenu: BlockClosure>>cull: [ | selArgCount | "show cursor in case item opens a new MVC window" (selArgCount := selector numArgs) = 0 ifTrue: [ target perform: selector ] ifFalse: [ selArgCount = arguments size ifTrue: [ target perform: selector withArguments: arguments ] ifFalse: [ target perform: selector withArguments: (arguments copyWith: evt) ] ]. self changed ] 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: [ ActiveHand := self. ActiveEvent := anEvent. result := focusHolder handleFocusEvent: (anEvent transformedBy: (focusHolder transformedFrom: self)) ] in HandMorph>>sendFocusEvent:to:clear: BlockClosure>>on:do: WorldMorph(PasteUpMorph)>>becomeActiveDuring: HandMorph>>sendFocusEvent:to:clear: HandMorph>>sendEvent:focus:clear: HandMorph>>sendMouseEvent: HandMorph>>handleEvent: HandMorph>>processEvents [ :h | ActiveHand := h. h processEvents. ActiveHand := nil ] in WorldState>>doOneCycleNowFor: Array(SequenceableCollection)>>do: WorldState>>handsDo: WorldState>>doOneCycleNowFor: WorldState>>doOneCycleFor: WorldMorph>>doOneCycle [ World doOneCycle. Processor yield. false ] in MorphicUIManager>>spawnNewProcess [ self value. Processor terminateActive ] in BlockClosure>>newProcess ------------------------------------------------------------------------------- THERE_BE_DRAGONS_HERE ZnInvalidUTF8: Invalid utf8 input detected 12 November 2014 10:12:51.071184 am VM: unix - i686 - linux-gnu - NBCoInterpreter NativeBoost-CogPlugin-EstebanLorenzano.20 uuid: cf2aeeee-897d-48fd-8251-6789dd21d958 Jun 14 2014 NBCogit NativeBoost-CogPlugin-EstebanLorenzano.20 uuid: cf2aeeee-897d-48fd-8251-6789dd21d958 Jun 14 2014 https://github.com/pharo-project/pharo-vm.git Commit: 0e8bbfbaeb03237fa6bb63ba834773fab18ca307 Date: 2014-06-14 12:20:21 -0300 By: Esteban Lorenzano Jenkins build #14833 Image: Pharo3.0 [Latest update: #30858] UTF8TextConverter>>errorMalformedInput Receiver: an UTF8TextConverter Arguments and temporary variables: Receiver's instance variables: latin1Map: #[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...etc... latin1Encodings: #(nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil ...etc... UTF8TextConverter>>nextFromStream: Receiver: an UTF8TextConverter Arguments and temporary variables: aStream: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-...etc... character1: $������ value1: 169 character2: $' value2: 39 unicode: nil character3: $! value3: 33 character4: nil value4: nil Receiver's instance variables: latin1Map: #[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...etc... latin1Encodings: #(nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil ...etc... MultiByteFileStream>>next Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: char: nil secondChar: nil state: nil Receiver's instance variables: MultiByteFileStream(PositionableStream)>>oldBack Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: Receiver's instance variables: MultiByteFileStream(PositionableStream)>>oldPeekBack Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: element: nil Receiver's instance variables: MultiByteFileStream(PositionableStream)>>backChunk Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: terminator: $! out: a WriteStream ch: $! Receiver's instance variables: WriteStream(PositionableStream)>>copyPreamble:from:at: Receiver: a WriteStream Arguments and temporary variables: preamble: 'DrGeoScriptTest methodsFor: ''as yet unclassified''' aStream: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-...etc... pos: 37918594 terminator: $! last50: nil stamp: nil i: nil Receiver's instance variables: collection: '''From Pharo3.0 of 18 March 2013 [Latest update: #30858] on 12 Nov...etc... position: 301 readLimit: 0 writeLimit: 374 DrGeoScriptTest class(ClassDescription)>>printMethodChunk:withPreamble:on:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: selector: #scriptName doPreamble: true outStream: a WriteStream moveSource: false fileIndex: 0 preamble: 'DrGeoScriptTest methodsFor: ''as yet unclassified''' method: DrGeoScriptTest>>#scriptName oldPos: 37918594 newPos: nil sourceFile: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/D...etc... endPos: nil Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil [ :sel | self printMethodChunk: sel withPreamble: true on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aSymbol: #'as yet unclassified' aFileStream: a WriteStream moveSource: false fileIndex: 0 selectors: #(#scriptName) sel: #scriptName Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil Array(SequenceableCollection)>>do: Receiver: #(#scriptName) Arguments and temporary variables: aBlock: [ :sel | self printMethodChunk: sel withPreamble: true on: aFileStr...etc... index: 1 Receiver's instance variables: #(#scriptName) DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aSymbol: #'as yet unclassified' aFileStream: a WriteStream moveSource: false fileIndex: 0 selectors: #(#scriptName) Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil [ :heading | self fileOutCategory: heading on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 heading: #'as yet unclassified' Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil Array(SequenceableCollection)>>do: Receiver: #(#'as yet unclassified') Arguments and temporary variables: aBlock: [ :heading | self fileOutCategory: heading on: aFileStream moveSour...etc... index: 1 Receiver's instance variables: #(#'as yet unclassified') DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile:initializing: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 aBool: true Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil DrGeoScriptTest class(Class)>>fileOut Receiver: DrGeoScriptTest Arguments and temporary variables: internalStream: a WriteStream Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil [ :class | class theNonMetaClass fileOut ] in NautilusUI(AbstractTool)>>fileOutClasses: Receiver: a NautilusUI Arguments and temporary variables: aCollection: {DrGeoScriptTest} class: DrGeoScriptTest Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget [ :element | aBlock value: element. bar increment ] in [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: Receiver: a NautilusUI Arguments and temporary variables: aBlock: [ :class | class theNonMetaClass fileOut ] aCollection: {DrGeoScriptTest} aString: 'Filing out classes...' job: a Job bar: a Job element: DrGeoScriptTest Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget Array(SequenceableCollection)>>do: Receiver: {DrGeoScriptTest} Arguments and temporary variables: aBlock: [ :element | aBlock value: element. bar increment ] index: 1 Receiver's instance variables: {DrGeoScriptTest} [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: Receiver: a NautilusUI Arguments and temporary variables: aBlock: [ :class | class theNonMetaClass fileOut ] aCollection: {DrGeoScriptTest} aString: 'Filing out classes...' job: a Job bar: a Job Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget BlockClosure>>cull: Receiver: [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] Arguments and temporary variables: anArg: a Job Receiver's instance variables: outerContext: NautilusUI(AbstractTool)>>do:on:displaying: startpc: 55 numArgs: 1 [ result := block cull: self ] in [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run Receiver: a Job Arguments and temporary variables: result: nil Receiver's instance variables: block: [ :bar | aCollection do: [ :element | aBlock value: element. bar ...etc... currentValue: 0 min: 0 max: 1 title: 'Filing out classes...' children: an OrderedCollection() isRunning: true parent: nil process: a Process in nil BlockClosure>>on:do: Receiver: [ result := block cull: self ] Arguments and temporary variables: exception: JobNotification handlerAction: [ :notification | notification handle: self ] handlerActive: true Receiver's instance variables: outerContext: [ self prepareForRunning. [ result := block cull: self ] on: Jo...etc... startpc: 57 numArgs: 0 [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run Receiver: a Job Arguments and temporary variables: result: nil Receiver's instance variables: block: [ :bar | aCollection do: [ :element | aBlock value: element. bar ...etc... currentValue: 0 min: 0 max: 1 title: 'Filing out classes...' children: an OrderedCollection() isRunning: true parent: nil process: a Process in nil BlockClosure>>ensure: Receiver: [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :not...etc... Arguments and temporary variables: aBlock: [ self cleanupAfterRunning ] complete: nil returnValue: nil Receiver's instance variables: outerContext: Job>>run startpc: 49 numArgs: 0 Job>>run Receiver: a Job Arguments and temporary variables: result: nil Receiver's instance variables: block: [ :bar | aCollection do: [ :element | aBlock value: element. bar ...etc... currentValue: 0 min: 0 max: 1 title: 'Filing out classes...' children: an OrderedCollection() isRunning: true parent: nil process: a Process in nil NautilusUI(AbstractTool)>>do:on:displaying: Receiver: a NautilusUI Arguments and temporary variables: aBlock: [ :class | class theNonMetaClass fileOut ] aCollection: {DrGeoScriptTest} aString: 'Filing out classes...' job: a Job Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget NautilusUI(AbstractTool)>>fileOutClasses: Receiver: a NautilusUI Arguments and temporary variables: aCollection: {DrGeoScriptTest} Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget NautilusUI(AbstractNautilusUI)>>fileOutClass Receiver: a NautilusUI Arguments and temporary variables: Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget [ target fileOutClass ] in AbstractNautilusUI class>>classesMenu: Receiver: AbstractNautilusUI Arguments and temporary variables: aBuilder: a PragmaMenuAndShortcutRegistration target: a NautilusUI Receiver's instance variables: superclass: AbstractTool methodDict: a MethodDictionary(size 430) format: 180 layout: a FixedLayout instanceVariables: #(#model #window #hierarchyClass #cachedHierarchy #sourceTex...etc... organization: a ClassOrganization subclasses: {NautilusUI} name: #AbstractNautilusUI classPool: a Dictionary(#ClassesIconsCache->a WeakIdentityKeyDictionary(size 46...etc... sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #Nautilus traitComposition: {} localSelectors: nil BlockClosure>>cull: Receiver: [ target fileOutClass ] Arguments and temporary variables: anArg: a NautilusUI Receiver's instance variables: outerContext: AbstractNautilusUI class>>classesMenu: startpc: 746 numArgs: 0 [ | selArgCount | "show cursor in case item opens a new MVC window" (selArgCount := selector numArgs) = 0 ifTrue: [ target perform: selector ] ifFalse: [ selArgCount = arguments size ifTrue: [ target perform: selector withArguments: arguments ] ifFalse: [ target perform: selector withArguments: (arguments copyWith: evt) ] ]. self changed ] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Receiver: a ToggleMenuItemMorph(751828992)'File Out' Arguments and temporary variables: evt: [(702@779) mouseUp 3567662 nil] w: a WorldMorph(511705088) [world] selArgCount: 1 Receiver's instance variables: bounds: (586.0@768.0) corner: (779.0@784.0) owner: a MenuMorph(283901952) submorphs: #() fullBounds: (586.0@768.0) corner: (779.0@784.0) color: Color black extension: a MorphExtension (781189120) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil BlockClosure>>ensure: Receiver: [ | selArgCount | "show cursor in case item opens a new MVC window" (selArgCount := selec...etc... Arguments and temporary variables: aBlock: [ oldcursor show ] complete: nil returnValue: nil Receiver's instance variables: outerContext: ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: startpc: 134 numArgs: 0 CursorWithMask(Cursor)>>showWhile: Receiver: ((CursorWithMask extent: (16@16) depth: 1 fromArray: #( 2r0 2r100000000000000000000...etc... Arguments and temporary variables: aBlock: [ | selArgCount | "show cursor in case item opens a new MVC window" (s...etc... oldcursor: ((CursorWithMask extent: (16@16) depth: 1 fromArray: #( 2r0 2...etc... Receiver's instance variables: bits: a Bitmap of length 16 width: 16 height: 16 depth: 1 offset: (-1@ -1) maskForm: Form(16x16x1) ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Receiver: a ToggleMenuItemMorph(751828992)'File Out' Arguments and temporary variables: evt: [(702@779) mouseUp 3567662 nil] w: a WorldMorph(511705088) [world] Receiver's instance variables: bounds: (586.0@768.0) corner: (779.0@784.0) owner: a MenuMorph(283901952) submorphs: #() fullBounds: (586.0@768.0) corner: (779.0@784.0) color: Color black extension: a MorphExtension (781189120) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil ToggleMenuItemMorph(MenuItemMorph)>>mouseUp: Receiver: a ToggleMenuItemMorph(751828992)'File Out' Arguments and temporary variables: evt: [(702@779) mouseUp 3567662 nil] Receiver's instance variables: bounds: (586.0@768.0) corner: (779.0@784.0) owner: a MenuMorph(283901952) submorphs: #() fullBounds: (586.0@768.0) corner: (779.0@784.0) color: Color black extension: a MorphExtension (781189120) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp: Receiver: a ToggleMenuItemMorph(751828992)'File Out' Arguments and temporary variables: anEvent: [(702@779) mouseUp 3567662 nil] Receiver's instance variables: bounds: (586.0@768.0) corner: (779.0@784.0) owner: a MenuMorph(283901952) submorphs: #() fullBounds: (586.0@768.0) corner: (779.0@784.0) color: Color black extension: a MorphExtension (781189120) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil MouseButtonEvent>>sentTo: Receiver: [(702@779) mouseUp 3567662 nil] Arguments and temporary variables: anObject: a ToggleMenuItemMorph(751828992)'File Out' Receiver's instance variables: timeStamp: 3567662 source: a HandMorph(760479744) windowIndex: nil type: #mouseUp buttons: 0 position: (702@779) handler: nil wasHandled: true whichButton: 4 --- The full stack --- UTF8TextConverter>>errorMalformedInput UTF8TextConverter>>nextFromStream: MultiByteFileStream>>next MultiByteFileStream(PositionableStream)>>oldBack MultiByteFileStream(PositionableStream)>>oldPeekBack MultiByteFileStream(PositionableStream)>>backChunk WriteStream(PositionableStream)>>copyPreamble:from:at: DrGeoScriptTest class(ClassDescription)>>printMethodChunk:withPreamble:on:moveSource:toFile: [ :sel | self printMethodChunk: sel withPreamble: true on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: Array(SequenceableCollection)>>do: DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: [ :heading | self fileOutCategory: heading on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: Array(SequenceableCollection)>>do: DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile:initializing: DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile: DrGeoScriptTest class(Class)>>fileOut [ :class | class theNonMetaClass fileOut ] in NautilusUI(AbstractTool)>>fileOutClasses: [ :element | aBlock value: element. bar increment ] in [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: Array(SequenceableCollection)>>do: [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: BlockClosure>>cull: [ result := block cull: self ] in [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run BlockClosure>>on:do: [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run BlockClosure>>ensure: Job>>run NautilusUI(AbstractTool)>>do:on:displaying: NautilusUI(AbstractTool)>>fileOutClasses: NautilusUI(AbstractNautilusUI)>>fileOutClass [ target fileOutClass ] in AbstractNautilusUI class>>classesMenu: BlockClosure>>cull: [ | selArgCount | "show cursor in case item opens a new MVC window" (selArgCount := selector numArgs) = 0 ifTrue: [ target perform: selector ] ifFalse: [ selArgCount = arguments size ifTrue: [ target perform: selector withArguments: arguments ] ifFalse: [ target perform: selector withArguments: (arguments copyWith: evt) ] ]. self changed ] 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: [ ActiveHand := self. ActiveEvent := anEvent. result := focusHolder handleFocusEvent: (anEvent transformedBy: (focusHolder transformedFrom: self)) ] in HandMorph>>sendFocusEvent:to:clear: BlockClosure>>on:do: WorldMorph(PasteUpMorph)>>becomeActiveDuring: HandMorph>>sendFocusEvent:to:clear: HandMorph>>sendEvent:focus:clear: HandMorph>>sendMouseEvent: HandMorph>>handleEvent: HandMorph>>processEvents [ :h | ActiveHand := h. h processEvents. ActiveHand := nil ] in WorldState>>doOneCycleNowFor: Array(SequenceableCollection)>>do: WorldState>>handsDo: WorldState>>doOneCycleNowFor: WorldState>>doOneCycleFor: WorldMorph>>doOneCycle [ World doOneCycle. Processor yield. false ] in MorphicUIManager>>spawnNewProcess [ self value. Processor terminateActive ] in BlockClosure>>newProcess ------------------------------------------------------------------------------- THERE_BE_DRAGONS_HERE ZnInvalidUTF8: Invalid utf8 input detected 12 November 2014 10:14:17.186356 am VM: unix - i686 - linux-gnu - NBCoInterpreter NativeBoost-CogPlugin-EstebanLorenzano.20 uuid: cf2aeeee-897d-48fd-8251-6789dd21d958 Jun 14 2014 NBCogit NativeBoost-CogPlugin-EstebanLorenzano.20 uuid: cf2aeeee-897d-48fd-8251-6789dd21d958 Jun 14 2014 https://github.com/pharo-project/pharo-vm.git Commit: 0e8bbfbaeb03237fa6bb63ba834773fab18ca307 Date: 2014-06-14 12:20:21 -0300 By: Esteban Lorenzano Jenkins build #14833 Image: Pharo3.0 [Latest update: #30858] UTF8TextConverter>>errorMalformedInput Receiver: an UTF8TextConverter Arguments and temporary variables: Receiver's instance variables: latin1Map: #[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...etc... latin1Encodings: #(nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil ...etc... UTF8TextConverter>>nextFromStream: Receiver: an UTF8TextConverter Arguments and temporary variables: aStream: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-...etc... character1: $������ value1: 169 character2: $' value2: 39 unicode: nil character3: $! value3: 33 character4: nil value4: nil Receiver's instance variables: latin1Map: #[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...etc... latin1Encodings: #(nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil ...etc... MultiByteFileStream>>next Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: char: nil secondChar: nil state: nil Receiver's instance variables: MultiByteFileStream(PositionableStream)>>oldBack Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: Receiver's instance variables: MultiByteFileStream(PositionableStream)>>oldPeekBack Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: element: nil Receiver's instance variables: MultiByteFileStream(PositionableStream)>>backChunk Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: terminator: $! out: a WriteStream ch: $! Receiver's instance variables: WriteStream(PositionableStream)>>copyPreamble:from:at: Receiver: a WriteStream Arguments and temporary variables: preamble: 'DrGeoScriptTest methodsFor: ''as yet unclassified''' aStream: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-...etc... pos: 37918594 terminator: $! last50: nil stamp: nil i: nil Receiver's instance variables: collection: '''From Pharo3.0 of 18 March 2013 [Latest update: #30858] on 12 Nov...etc... position: 302 readLimit: 0 writeLimit: 376 DrGeoScriptTest class(ClassDescription)>>printMethodChunk:withPreamble:on:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: selector: #scriptName doPreamble: true outStream: a WriteStream moveSource: false fileIndex: 0 preamble: 'DrGeoScriptTest methodsFor: ''as yet unclassified''' method: DrGeoScriptTest>>#scriptName oldPos: 37918594 newPos: nil sourceFile: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/D...etc... endPos: nil Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil [ :sel | self printMethodChunk: sel withPreamble: true on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aSymbol: #'as yet unclassified' aFileStream: a WriteStream moveSource: false fileIndex: 0 selectors: #(#scriptName) sel: #scriptName Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil Array(SequenceableCollection)>>do: Receiver: #(#scriptName) Arguments and temporary variables: aBlock: [ :sel | self printMethodChunk: sel withPreamble: true on: aFileStr...etc... index: 1 Receiver's instance variables: #(#scriptName) DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aSymbol: #'as yet unclassified' aFileStream: a WriteStream moveSource: false fileIndex: 0 selectors: #(#scriptName) Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil [ :heading | self fileOutCategory: heading on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 heading: #'as yet unclassified' Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil Array(SequenceableCollection)>>do: Receiver: #(#'as yet unclassified') Arguments and temporary variables: aBlock: [ :heading | self fileOutCategory: heading on: aFileStream moveSour...etc... index: 1 Receiver's instance variables: #(#'as yet unclassified') DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile:initializing: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 aBool: true Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil DrGeoScriptTest class(Class)>>fileOut Receiver: DrGeoScriptTest Arguments and temporary variables: internalStream: a WriteStream Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil [ :class | class theNonMetaClass fileOut ] in NautilusUI(AbstractTool)>>fileOutClasses: Receiver: a NautilusUI Arguments and temporary variables: aCollection: {DrGeoScriptTest} class: DrGeoScriptTest Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget [ :element | aBlock value: element. bar increment ] in [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: Receiver: a NautilusUI Arguments and temporary variables: aBlock: [ :class | class theNonMetaClass fileOut ] aCollection: {DrGeoScriptTest} aString: 'Filing out classes...' job: a Job bar: a Job element: DrGeoScriptTest Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget Array(SequenceableCollection)>>do: Receiver: {DrGeoScriptTest} Arguments and temporary variables: aBlock: [ :element | aBlock value: element. bar increment ] index: 1 Receiver's instance variables: {DrGeoScriptTest} [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: Receiver: a NautilusUI Arguments and temporary variables: aBlock: [ :class | class theNonMetaClass fileOut ] aCollection: {DrGeoScriptTest} aString: 'Filing out classes...' job: a Job bar: a Job Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget BlockClosure>>cull: Receiver: [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] Arguments and temporary variables: anArg: a Job Receiver's instance variables: outerContext: NautilusUI(AbstractTool)>>do:on:displaying: startpc: 55 numArgs: 1 [ result := block cull: self ] in [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run Receiver: a Job Arguments and temporary variables: result: nil Receiver's instance variables: block: [ :bar | aCollection do: [ :element | aBlock value: element. bar ...etc... currentValue: 0 min: 0 max: 1 title: 'Filing out classes...' children: an OrderedCollection() isRunning: true parent: nil process: a Process in nil BlockClosure>>on:do: Receiver: [ result := block cull: self ] Arguments and temporary variables: exception: JobNotification handlerAction: [ :notification | notification handle: self ] handlerActive: true Receiver's instance variables: outerContext: [ self prepareForRunning. [ result := block cull: self ] on: Jo...etc... startpc: 57 numArgs: 0 [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run Receiver: a Job Arguments and temporary variables: result: nil Receiver's instance variables: block: [ :bar | aCollection do: [ :element | aBlock value: element. bar ...etc... currentValue: 0 min: 0 max: 1 title: 'Filing out classes...' children: an OrderedCollection() isRunning: true parent: nil process: a Process in nil BlockClosure>>ensure: Receiver: [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :not...etc... Arguments and temporary variables: aBlock: [ self cleanupAfterRunning ] complete: nil returnValue: nil Receiver's instance variables: outerContext: Job>>run startpc: 49 numArgs: 0 Job>>run Receiver: a Job Arguments and temporary variables: result: nil Receiver's instance variables: block: [ :bar | aCollection do: [ :element | aBlock value: element. bar ...etc... currentValue: 0 min: 0 max: 1 title: 'Filing out classes...' children: an OrderedCollection() isRunning: true parent: nil process: a Process in nil NautilusUI(AbstractTool)>>do:on:displaying: Receiver: a NautilusUI Arguments and temporary variables: aBlock: [ :class | class theNonMetaClass fileOut ] aCollection: {DrGeoScriptTest} aString: 'Filing out classes...' job: a Job Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget NautilusUI(AbstractTool)>>fileOutClasses: Receiver: a NautilusUI Arguments and temporary variables: aCollection: {DrGeoScriptTest} Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget NautilusUI(AbstractNautilusUI)>>fileOutClass Receiver: a NautilusUI Arguments and temporary variables: Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget [ target fileOutClass ] in AbstractNautilusUI class>>classesMenu: Receiver: AbstractNautilusUI Arguments and temporary variables: aBuilder: a PragmaMenuAndShortcutRegistration target: a NautilusUI Receiver's instance variables: superclass: AbstractTool methodDict: a MethodDictionary(size 430) format: 180 layout: a FixedLayout instanceVariables: #(#model #window #hierarchyClass #cachedHierarchy #sourceTex...etc... organization: a ClassOrganization subclasses: {NautilusUI} name: #AbstractNautilusUI classPool: a Dictionary(#ClassesIconsCache->a WeakIdentityKeyDictionary(size 46...etc... sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #Nautilus traitComposition: {} localSelectors: nil BlockClosure>>cull: Receiver: [ target fileOutClass ] Arguments and temporary variables: anArg: a NautilusUI Receiver's instance variables: outerContext: AbstractNautilusUI class>>classesMenu: startpc: 746 numArgs: 0 [ | selArgCount | "show cursor in case item opens a new MVC window" (selArgCount := selector numArgs) = 0 ifTrue: [ target perform: selector ] ifFalse: [ selArgCount = arguments size ifTrue: [ target perform: selector withArguments: arguments ] ifFalse: [ target perform: selector withArguments: (arguments copyWith: evt) ] ]. self changed ] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Receiver: a ToggleMenuItemMorph(297533440)'File Out' Arguments and temporary variables: evt: [(1045@842) mouseUp 3653758 nil] w: a WorldMorph(511705088) [world] selArgCount: 1 Receiver's instance variables: bounds: (947.0@835.0) corner: (1140.0@851.0) owner: a MenuMorph(142344192) submorphs: #() fullBounds: (947.0@835.0) corner: (1140.0@851.0) color: Color black extension: a MorphExtension (326893568) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil BlockClosure>>ensure: Receiver: [ | selArgCount | "show cursor in case item opens a new MVC window" (selArgCount := selec...etc... Arguments and temporary variables: aBlock: [ oldcursor show ] complete: nil returnValue: nil Receiver's instance variables: outerContext: ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: startpc: 134 numArgs: 0 CursorWithMask(Cursor)>>showWhile: Receiver: ((CursorWithMask extent: (16@16) depth: 1 fromArray: #( 2r0 2r100000000000000000000...etc... Arguments and temporary variables: aBlock: [ | selArgCount | "show cursor in case item opens a new MVC window" (s...etc... oldcursor: ((CursorWithMask extent: (16@16) depth: 1 fromArray: #( 2r0 2...etc... Receiver's instance variables: bits: a Bitmap of length 16 width: 16 height: 16 depth: 1 offset: (-1@ -1) maskForm: Form(16x16x1) ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Receiver: a ToggleMenuItemMorph(297533440)'File Out' Arguments and temporary variables: evt: [(1045@842) mouseUp 3653758 nil] w: a WorldMorph(511705088) [world] Receiver's instance variables: bounds: (947.0@835.0) corner: (1140.0@851.0) owner: a MenuMorph(142344192) submorphs: #() fullBounds: (947.0@835.0) corner: (1140.0@851.0) color: Color black extension: a MorphExtension (326893568) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil ToggleMenuItemMorph(MenuItemMorph)>>mouseUp: Receiver: a ToggleMenuItemMorph(297533440)'File Out' Arguments and temporary variables: evt: [(1045@842) mouseUp 3653758 nil] Receiver's instance variables: bounds: (947.0@835.0) corner: (1140.0@851.0) owner: a MenuMorph(142344192) submorphs: #() fullBounds: (947.0@835.0) corner: (1140.0@851.0) color: Color black extension: a MorphExtension (326893568) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp: Receiver: a ToggleMenuItemMorph(297533440)'File Out' Arguments and temporary variables: anEvent: [(1045@842) mouseUp 3653758 nil] Receiver's instance variables: bounds: (947.0@835.0) corner: (1140.0@851.0) owner: a MenuMorph(142344192) submorphs: #() fullBounds: (947.0@835.0) corner: (1140.0@851.0) color: Color black extension: a MorphExtension (326893568) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil MouseButtonEvent>>sentTo: Receiver: [(1045@842) mouseUp 3653758 nil] Arguments and temporary variables: anObject: a ToggleMenuItemMorph(297533440)'File Out' Receiver's instance variables: timeStamp: 3653758 source: a HandMorph(760479744) windowIndex: nil type: #mouseUp buttons: 0 position: (1045@842) handler: nil wasHandled: true whichButton: 4 --- The full stack --- UTF8TextConverter>>errorMalformedInput UTF8TextConverter>>nextFromStream: MultiByteFileStream>>next MultiByteFileStream(PositionableStream)>>oldBack MultiByteFileStream(PositionableStream)>>oldPeekBack MultiByteFileStream(PositionableStream)>>backChunk WriteStream(PositionableStream)>>copyPreamble:from:at: DrGeoScriptTest class(ClassDescription)>>printMethodChunk:withPreamble:on:moveSource:toFile: [ :sel | self printMethodChunk: sel withPreamble: true on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: Array(SequenceableCollection)>>do: DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: [ :heading | self fileOutCategory: heading on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: Array(SequenceableCollection)>>do: DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile:initializing: DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile: DrGeoScriptTest class(Class)>>fileOut [ :class | class theNonMetaClass fileOut ] in NautilusUI(AbstractTool)>>fileOutClasses: [ :element | aBlock value: element. bar increment ] in [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: Array(SequenceableCollection)>>do: [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: BlockClosure>>cull: [ result := block cull: self ] in [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run BlockClosure>>on:do: [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run BlockClosure>>ensure: Job>>run NautilusUI(AbstractTool)>>do:on:displaying: NautilusUI(AbstractTool)>>fileOutClasses: NautilusUI(AbstractNautilusUI)>>fileOutClass [ target fileOutClass ] in AbstractNautilusUI class>>classesMenu: BlockClosure>>cull: [ | selArgCount | "show cursor in case item opens a new MVC window" (selArgCount := selector numArgs) = 0 ifTrue: [ target perform: selector ] ifFalse: [ selArgCount = arguments size ifTrue: [ target perform: selector withArguments: arguments ] ifFalse: [ target perform: selector withArguments: (arguments copyWith: evt) ] ]. self changed ] 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: [ ActiveHand := self. ActiveEvent := anEvent. result := focusHolder handleFocusEvent: (anEvent transformedBy: (focusHolder transformedFrom: self)) ] in HandMorph>>sendFocusEvent:to:clear: BlockClosure>>on:do: WorldMorph(PasteUpMorph)>>becomeActiveDuring: HandMorph>>sendFocusEvent:to:clear: HandMorph>>sendEvent:focus:clear: HandMorph>>sendMouseEvent: HandMorph>>handleEvent: HandMorph>>processEvents [ :h | ActiveHand := h. h processEvents. ActiveHand := nil ] in WorldState>>doOneCycleNowFor: Array(SequenceableCollection)>>do: WorldState>>handsDo: WorldState>>doOneCycleNowFor: WorldState>>doOneCycleFor: WorldMorph>>doOneCycle [ World doOneCycle. Processor yield. false ] in MorphicUIManager>>spawnNewProcess [ self value. Processor terminateActive ] in BlockClosure>>newProcess ------------------------------------------------------------------------------- THERE_BE_DRAGONS_HERE ZnInvalidUTF8: Invalid utf8 input detected 12 November 2014 10:14:25.530958 am VM: unix - i686 - linux-gnu - NBCoInterpreter NativeBoost-CogPlugin-EstebanLorenzano.20 uuid: cf2aeeee-897d-48fd-8251-6789dd21d958 Jun 14 2014 NBCogit NativeBoost-CogPlugin-EstebanLorenzano.20 uuid: cf2aeeee-897d-48fd-8251-6789dd21d958 Jun 14 2014 https://github.com/pharo-project/pharo-vm.git Commit: 0e8bbfbaeb03237fa6bb63ba834773fab18ca307 Date: 2014-06-14 12:20:21 -0300 By: Esteban Lorenzano Jenkins build #14833 Image: Pharo3.0 [Latest update: #30858] UTF8TextConverter>>errorMalformedInput Receiver: an UTF8TextConverter Arguments and temporary variables: Receiver's instance variables: latin1Map: #[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...etc... latin1Encodings: #(nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil ...etc... UTF8TextConverter>>nextFromStream: Receiver: an UTF8TextConverter Arguments and temporary variables: aStream: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-...etc... character1: $������ value1: 169 character2: $' value2: 39 unicode: nil character3: $! value3: 33 character4: nil value4: nil Receiver's instance variables: latin1Map: #[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...etc... latin1Encodings: #(nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil ...etc... MultiByteFileStream>>next Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: char: nil secondChar: nil state: nil Receiver's instance variables: MultiByteFileStream(PositionableStream)>>oldBack Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: Receiver's instance variables: MultiByteFileStream(PositionableStream)>>oldPeekBack Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: element: nil Receiver's instance variables: MultiByteFileStream(PositionableStream)>>backChunk Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: terminator: $! out: a WriteStream ch: $! Receiver's instance variables: WriteStream(PositionableStream)>>copyPreamble:from:at: Receiver: a WriteStream Arguments and temporary variables: preamble: 'DrGeoScriptTest methodsFor: ''as yet unclassified''' aStream: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-...etc... pos: 37918594 terminator: $! last50: nil stamp: nil i: nil Receiver's instance variables: collection: '''From Pharo3.0 of 18 March 2013 [Latest update: #30858] on 12 Nov...etc... position: 301 readLimit: 0 writeLimit: 374 DrGeoScriptTest class(ClassDescription)>>printMethodChunk:withPreamble:on:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: selector: #scriptName doPreamble: true outStream: a WriteStream moveSource: false fileIndex: 0 preamble: 'DrGeoScriptTest methodsFor: ''as yet unclassified''' method: DrGeoScriptTest>>#scriptName oldPos: 37918594 newPos: nil sourceFile: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/D...etc... endPos: nil Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil [ :sel | self printMethodChunk: sel withPreamble: true on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aSymbol: #'as yet unclassified' aFileStream: a WriteStream moveSource: false fileIndex: 0 selectors: #(#scriptName) sel: #scriptName Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil Array(SequenceableCollection)>>do: Receiver: #(#scriptName) Arguments and temporary variables: aBlock: [ :sel | self printMethodChunk: sel withPreamble: true on: aFileStr...etc... index: 1 Receiver's instance variables: #(#scriptName) DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aSymbol: #'as yet unclassified' aFileStream: a WriteStream moveSource: false fileIndex: 0 selectors: #(#scriptName) Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil [ :heading | self fileOutCategory: heading on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 heading: #'as yet unclassified' Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil Array(SequenceableCollection)>>do: Receiver: #(#'as yet unclassified') Arguments and temporary variables: aBlock: [ :heading | self fileOutCategory: heading on: aFileStream moveSour...etc... index: 1 Receiver's instance variables: #(#'as yet unclassified') DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile:initializing: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 aBool: true Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil DrGeoScriptTest class(Class)>>fileOut Receiver: DrGeoScriptTest Arguments and temporary variables: internalStream: a WriteStream Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil [ :class | class theNonMetaClass fileOut ] in NautilusUI(AbstractTool)>>fileOutClasses: Receiver: a NautilusUI Arguments and temporary variables: aCollection: {DrGeoScriptTest} class: DrGeoScriptTest Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget [ :element | aBlock value: element. bar increment ] in [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: Receiver: a NautilusUI Arguments and temporary variables: aBlock: [ :class | class theNonMetaClass fileOut ] aCollection: {DrGeoScriptTest} aString: 'Filing out classes...' job: a Job bar: a Job element: DrGeoScriptTest Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget Array(SequenceableCollection)>>do: Receiver: {DrGeoScriptTest} Arguments and temporary variables: aBlock: [ :element | aBlock value: element. bar increment ] index: 1 Receiver's instance variables: {DrGeoScriptTest} [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: Receiver: a NautilusUI Arguments and temporary variables: aBlock: [ :class | class theNonMetaClass fileOut ] aCollection: {DrGeoScriptTest} aString: 'Filing out classes...' job: a Job bar: a Job Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget BlockClosure>>cull: Receiver: [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] Arguments and temporary variables: anArg: a Job Receiver's instance variables: outerContext: NautilusUI(AbstractTool)>>do:on:displaying: startpc: 55 numArgs: 1 [ result := block cull: self ] in [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run Receiver: a Job Arguments and temporary variables: result: nil Receiver's instance variables: block: [ :bar | aCollection do: [ :element | aBlock value: element. bar ...etc... currentValue: 0 min: 0 max: 1 title: 'Filing out classes...' children: an OrderedCollection() isRunning: true parent: nil process: a Process in nil BlockClosure>>on:do: Receiver: [ result := block cull: self ] Arguments and temporary variables: exception: JobNotification handlerAction: [ :notification | notification handle: self ] handlerActive: true Receiver's instance variables: outerContext: [ self prepareForRunning. [ result := block cull: self ] on: Jo...etc... startpc: 57 numArgs: 0 [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run Receiver: a Job Arguments and temporary variables: result: nil Receiver's instance variables: block: [ :bar | aCollection do: [ :element | aBlock value: element. bar ...etc... currentValue: 0 min: 0 max: 1 title: 'Filing out classes...' children: an OrderedCollection() isRunning: true parent: nil process: a Process in nil BlockClosure>>ensure: Receiver: [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :not...etc... Arguments and temporary variables: aBlock: [ self cleanupAfterRunning ] complete: nil returnValue: nil Receiver's instance variables: outerContext: Job>>run startpc: 49 numArgs: 0 Job>>run Receiver: a Job Arguments and temporary variables: result: nil Receiver's instance variables: block: [ :bar | aCollection do: [ :element | aBlock value: element. bar ...etc... currentValue: 0 min: 0 max: 1 title: 'Filing out classes...' children: an OrderedCollection() isRunning: true parent: nil process: a Process in nil NautilusUI(AbstractTool)>>do:on:displaying: Receiver: a NautilusUI Arguments and temporary variables: aBlock: [ :class | class theNonMetaClass fileOut ] aCollection: {DrGeoScriptTest} aString: 'Filing out classes...' job: a Job Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget NautilusUI(AbstractTool)>>fileOutClasses: Receiver: a NautilusUI Arguments and temporary variables: aCollection: {DrGeoScriptTest} Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget NautilusUI(AbstractNautilusUI)>>fileOutClass Receiver: a NautilusUI Arguments and temporary variables: Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget [ target fileOutClass ] in AbstractNautilusUI class>>classesMenu: Receiver: AbstractNautilusUI Arguments and temporary variables: aBuilder: a PragmaMenuAndShortcutRegistration target: a NautilusUI Receiver's instance variables: superclass: AbstractTool methodDict: a MethodDictionary(size 430) format: 180 layout: a FixedLayout instanceVariables: #(#model #window #hierarchyClass #cachedHierarchy #sourceTex...etc... organization: a ClassOrganization subclasses: {NautilusUI} name: #AbstractNautilusUI classPool: a Dictionary(#ClassesIconsCache->a WeakIdentityKeyDictionary(size 46...etc... sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #Nautilus traitComposition: {} localSelectors: nil BlockClosure>>cull: Receiver: [ target fileOutClass ] Arguments and temporary variables: anArg: a NautilusUI Receiver's instance variables: outerContext: AbstractNautilusUI class>>classesMenu: startpc: 746 numArgs: 0 [ | selArgCount | "show cursor in case item opens a new MVC window" (selArgCount := selector numArgs) = 0 ifTrue: [ target perform: selector ] ifFalse: [ selArgCount = arguments size ifTrue: [ target perform: selector withArguments: arguments ] ifFalse: [ target perform: selector withArguments: (arguments copyWith: evt) ] ]. self changed ] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Receiver: a ToggleMenuItemMorph(85458944)'File Out' Arguments and temporary variables: evt: [(982@846) mouseUp 3662110 nil] w: a WorldMorph(511705088) [world] selArgCount: 1 Receiver's instance variables: bounds: (907.0@836.0) corner: (1100.0@852.0) owner: a MenuMorph(699400192) submorphs: #() fullBounds: (907.0@836.0) corner: (1100.0@852.0) color: Color black extension: a MorphExtension (114819072) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil BlockClosure>>ensure: Receiver: [ | selArgCount | "show cursor in case item opens a new MVC window" (selArgCount := selec...etc... Arguments and temporary variables: aBlock: [ oldcursor show ] complete: nil returnValue: nil Receiver's instance variables: outerContext: ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: startpc: 134 numArgs: 0 CursorWithMask(Cursor)>>showWhile: Receiver: ((CursorWithMask extent: (16@16) depth: 1 fromArray: #( 2r0 2r100000000000000000000...etc... Arguments and temporary variables: aBlock: [ | selArgCount | "show cursor in case item opens a new MVC window" (s...etc... oldcursor: ((CursorWithMask extent: (16@16) depth: 1 fromArray: #( 2r0 2...etc... Receiver's instance variables: bits: a Bitmap of length 16 width: 16 height: 16 depth: 1 offset: (-1@ -1) maskForm: Form(16x16x1) ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Receiver: a ToggleMenuItemMorph(85458944)'File Out' Arguments and temporary variables: evt: [(982@846) mouseUp 3662110 nil] w: a WorldMorph(511705088) [world] Receiver's instance variables: bounds: (907.0@836.0) corner: (1100.0@852.0) owner: a MenuMorph(699400192) submorphs: #() fullBounds: (907.0@836.0) corner: (1100.0@852.0) color: Color black extension: a MorphExtension (114819072) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil ToggleMenuItemMorph(MenuItemMorph)>>mouseUp: Receiver: a ToggleMenuItemMorph(85458944)'File Out' Arguments and temporary variables: evt: [(982@846) mouseUp 3662110 nil] Receiver's instance variables: bounds: (907.0@836.0) corner: (1100.0@852.0) owner: a MenuMorph(699400192) submorphs: #() fullBounds: (907.0@836.0) corner: (1100.0@852.0) color: Color black extension: a MorphExtension (114819072) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp: Receiver: a ToggleMenuItemMorph(85458944)'File Out' Arguments and temporary variables: anEvent: [(982@846) mouseUp 3662110 nil] Receiver's instance variables: bounds: (907.0@836.0) corner: (1100.0@852.0) owner: a MenuMorph(699400192) submorphs: #() fullBounds: (907.0@836.0) corner: (1100.0@852.0) color: Color black extension: a MorphExtension (114819072) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil MouseButtonEvent>>sentTo: Receiver: [(982@846) mouseUp 3662110 nil] Arguments and temporary variables: anObject: a ToggleMenuItemMorph(85458944)'File Out' Receiver's instance variables: timeStamp: 3662110 source: a HandMorph(760479744) windowIndex: nil type: #mouseUp buttons: 0 position: (982@846) handler: nil wasHandled: true whichButton: 4 --- The full stack --- UTF8TextConverter>>errorMalformedInput UTF8TextConverter>>nextFromStream: MultiByteFileStream>>next MultiByteFileStream(PositionableStream)>>oldBack MultiByteFileStream(PositionableStream)>>oldPeekBack MultiByteFileStream(PositionableStream)>>backChunk WriteStream(PositionableStream)>>copyPreamble:from:at: DrGeoScriptTest class(ClassDescription)>>printMethodChunk:withPreamble:on:moveSource:toFile: [ :sel | self printMethodChunk: sel withPreamble: true on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: Array(SequenceableCollection)>>do: DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: [ :heading | self fileOutCategory: heading on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: Array(SequenceableCollection)>>do: DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile:initializing: DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile: DrGeoScriptTest class(Class)>>fileOut [ :class | class theNonMetaClass fileOut ] in NautilusUI(AbstractTool)>>fileOutClasses: [ :element | aBlock value: element. bar increment ] in [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: Array(SequenceableCollection)>>do: [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: BlockClosure>>cull: [ result := block cull: self ] in [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run BlockClosure>>on:do: [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run BlockClosure>>ensure: Job>>run NautilusUI(AbstractTool)>>do:on:displaying: NautilusUI(AbstractTool)>>fileOutClasses: NautilusUI(AbstractNautilusUI)>>fileOutClass [ target fileOutClass ] in AbstractNautilusUI class>>classesMenu: BlockClosure>>cull: [ | selArgCount | "show cursor in case item opens a new MVC window" (selArgCount := selector numArgs) = 0 ifTrue: [ target perform: selector ] ifFalse: [ selArgCount = arguments size ifTrue: [ target perform: selector withArguments: arguments ] ifFalse: [ target perform: selector withArguments: (arguments copyWith: evt) ] ]. self changed ] 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: [ ActiveHand := self. ActiveEvent := anEvent. result := focusHolder handleFocusEvent: (anEvent transformedBy: (focusHolder transformedFrom: self)) ] in HandMorph>>sendFocusEvent:to:clear: BlockClosure>>on:do: WorldMorph(PasteUpMorph)>>becomeActiveDuring: HandMorph>>sendFocusEvent:to:clear: HandMorph>>sendEvent:focus:clear: HandMorph>>sendMouseEvent: HandMorph>>handleEvent: HandMorph>>processEvents [ :h | ActiveHand := h. h processEvents. ActiveHand := nil ] in WorldState>>doOneCycleNowFor: Array(SequenceableCollection)>>do: WorldState>>handsDo: WorldState>>doOneCycleNowFor: WorldState>>doOneCycleFor: WorldMorph>>doOneCycle [ World doOneCycle. Processor yield. false ] in MorphicUIManager>>spawnNewProcess [ self value. Processor terminateActive ] in BlockClosure>>newProcess ------------------------------------------------------------------------------- THERE_BE_DRAGONS_HERE ZnInvalidUTF8: Invalid utf8 input detected 12 November 2014 10:14:33.508074 am VM: unix - i686 - linux-gnu - NBCoInterpreter NativeBoost-CogPlugin-EstebanLorenzano.20 uuid: cf2aeeee-897d-48fd-8251-6789dd21d958 Jun 14 2014 NBCogit NativeBoost-CogPlugin-EstebanLorenzano.20 uuid: cf2aeeee-897d-48fd-8251-6789dd21d958 Jun 14 2014 https://github.com/pharo-project/pharo-vm.git Commit: 0e8bbfbaeb03237fa6bb63ba834773fab18ca307 Date: 2014-06-14 12:20:21 -0300 By: Esteban Lorenzano Jenkins build #14833 Image: Pharo3.0 [Latest update: #30858] UTF8TextConverter>>errorMalformedInput Receiver: an UTF8TextConverter Arguments and temporary variables: Receiver's instance variables: latin1Map: #[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...etc... latin1Encodings: #(nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil ...etc... UTF8TextConverter>>nextFromStream: Receiver: an UTF8TextConverter Arguments and temporary variables: aStream: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-...etc... character1: $������ value1: 169 character2: $' value2: 39 unicode: nil character3: $! value3: 33 character4: nil value4: nil Receiver's instance variables: latin1Map: #[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...etc... latin1Encodings: #(nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil ...etc... MultiByteFileStream>>next Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: char: nil secondChar: nil state: nil Receiver's instance variables: MultiByteFileStream(PositionableStream)>>oldBack Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: Receiver's instance variables: MultiByteFileStream(PositionableStream)>>oldPeekBack Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: element: nil Receiver's instance variables: MultiByteFileStream(PositionableStream)>>backChunk Receiver: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-pharo3.0/shared/Phar...etc... Arguments and temporary variables: terminator: $! out: a WriteStream ch: $! Receiver's instance variables: WriteStream(PositionableStream)>>copyPreamble:from:at: Receiver: a WriteStream Arguments and temporary variables: preamble: 'DrGeoScriptTest methodsFor: ''as yet unclassified''' aStream: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/Dev-...etc... pos: 37918731 terminator: $! last50: nil stamp: nil i: nil Receiver's instance variables: collection: '''From Pharo3.0 of 18 March 2013 [Latest update: #30858] on 12 Nov...etc... position: 302 readLimit: 0 writeLimit: 376 DrGeoScriptTest class(ClassDescription)>>printMethodChunk:withPreamble:on:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: selector: #scriptName doPreamble: true outStream: a WriteStream moveSource: false fileIndex: 0 preamble: 'DrGeoScriptTest methodsFor: ''as yet unclassified''' method: DrGeoScriptTest>>#scriptName oldPos: 37918731 newPos: nil sourceFile: MultiByteFileStream: '/home/hilaire/Travaux/Developpement/DrGeoII/D...etc... endPos: nil Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil [ :sel | self printMethodChunk: sel withPreamble: true on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aSymbol: #'as yet unclassified' aFileStream: a WriteStream moveSource: false fileIndex: 0 selectors: #(#scriptName) sel: #scriptName Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil Array(SequenceableCollection)>>do: Receiver: #(#scriptName) Arguments and temporary variables: aBlock: [ :sel | self printMethodChunk: sel withPreamble: true on: aFileStr...etc... index: 1 Receiver's instance variables: #(#scriptName) DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aSymbol: #'as yet unclassified' aFileStream: a WriteStream moveSource: false fileIndex: 0 selectors: #(#scriptName) Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil [ :heading | self fileOutCategory: heading on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 heading: #'as yet unclassified' Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil Array(SequenceableCollection)>>do: Receiver: #(#'as yet unclassified') Arguments and temporary variables: aBlock: [ :heading | self fileOutCategory: heading on: aFileStream moveSour...etc... index: 1 Receiver's instance variables: #(#'as yet unclassified') DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile:initializing: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 aBool: true Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile: Receiver: DrGeoScriptTest Arguments and temporary variables: aFileStream: a WriteStream moveSource: false fileIndex: 0 Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil DrGeoScriptTest class(Class)>>fileOut Receiver: DrGeoScriptTest Arguments and temporary variables: internalStream: a WriteStream Receiver's instance variables: superclass: DrGeoUserScript methodDict: a MethodDictionary(#scriptName->DrGeoScriptTest>>#scriptName ) format: 134 layout: a FixedLayout instanceVariables: #() organization: a ClassOrganization subclasses: nil name: #DrGeoScriptTest classPool: a Dictionary() sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #'DrGeoII-User' traitComposition: {} localSelectors: nil [ :class | class theNonMetaClass fileOut ] in NautilusUI(AbstractTool)>>fileOutClasses: Receiver: a NautilusUI Arguments and temporary variables: aCollection: {DrGeoScriptTest} class: DrGeoScriptTest Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget [ :element | aBlock value: element. bar increment ] in [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: Receiver: a NautilusUI Arguments and temporary variables: aBlock: [ :class | class theNonMetaClass fileOut ] aCollection: {DrGeoScriptTest} aString: 'Filing out classes...' job: a Job bar: a Job element: DrGeoScriptTest Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget Array(SequenceableCollection)>>do: Receiver: {DrGeoScriptTest} Arguments and temporary variables: aBlock: [ :element | aBlock value: element. bar increment ] index: 1 Receiver's instance variables: {DrGeoScriptTest} [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: Receiver: a NautilusUI Arguments and temporary variables: aBlock: [ :class | class theNonMetaClass fileOut ] aCollection: {DrGeoScriptTest} aString: 'Filing out classes...' job: a Job bar: a Job Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget BlockClosure>>cull: Receiver: [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] Arguments and temporary variables: anArg: a Job Receiver's instance variables: outerContext: NautilusUI(AbstractTool)>>do:on:displaying: startpc: 55 numArgs: 1 [ result := block cull: self ] in [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run Receiver: a Job Arguments and temporary variables: result: nil Receiver's instance variables: block: [ :bar | aCollection do: [ :element | aBlock value: element. bar ...etc... currentValue: 0 min: 0 max: 1 title: 'Filing out classes...' children: an OrderedCollection() isRunning: true parent: nil process: a Process in nil BlockClosure>>on:do: Receiver: [ result := block cull: self ] Arguments and temporary variables: exception: JobNotification handlerAction: [ :notification | notification handle: self ] handlerActive: true Receiver's instance variables: outerContext: [ self prepareForRunning. [ result := block cull: self ] on: Jo...etc... startpc: 57 numArgs: 0 [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run Receiver: a Job Arguments and temporary variables: result: nil Receiver's instance variables: block: [ :bar | aCollection do: [ :element | aBlock value: element. bar ...etc... currentValue: 0 min: 0 max: 1 title: 'Filing out classes...' children: an OrderedCollection() isRunning: true parent: nil process: a Process in nil BlockClosure>>ensure: Receiver: [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :not...etc... Arguments and temporary variables: aBlock: [ self cleanupAfterRunning ] complete: nil returnValue: nil Receiver's instance variables: outerContext: Job>>run startpc: 49 numArgs: 0 Job>>run Receiver: a Job Arguments and temporary variables: result: nil Receiver's instance variables: block: [ :bar | aCollection do: [ :element | aBlock value: element. bar ...etc... currentValue: 0 min: 0 max: 1 title: 'Filing out classes...' children: an OrderedCollection() isRunning: true parent: nil process: a Process in nil NautilusUI(AbstractTool)>>do:on:displaying: Receiver: a NautilusUI Arguments and temporary variables: aBlock: [ :class | class theNonMetaClass fileOut ] aCollection: {DrGeoScriptTest} aString: 'Filing out classes...' job: a Job Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget NautilusUI(AbstractTool)>>fileOutClasses: Receiver: a NautilusUI Arguments and temporary variables: aCollection: {DrGeoScriptTest} Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget NautilusUI(AbstractNautilusUI)>>fileOutClass Receiver: a NautilusUI Arguments and temporary variables: Receiver's instance variables: dependents: a DependentsArray(a CategoryWidget a MethodWidget a NautilusWindow(...etc... model: a Nautilus window: a NautilusWindow(965214208) hierarchyClass: DrGeoScriptTest cachedHierarchy: a SortHierarchically sourceTextArea: a PluggableTextMorphWithLimits(520880128) groupsSelection: a Dictionary() packagesSelection: a Dictionary(a RPackage(DrGeoII-User)->true ) classesSelection: a Dictionary(DrGeoScript253132806->false DrGeoScriptTest->tru...etc... list: a PluggableIconListMorph(685244416) list2: a PluggableIconListMorph(239599616) sourceCodePanel: a PanelMorph(401342464) commentTextArea: nil currentDisplayChoice: #SourceCode sourceTextAreaLimit: 350 sourceCodeContainer: a PanelMorph(834142208) list2Elements: {DrGeoScript11194118. DrGeoScript11986811. DrGeoScript148488326....etc... listElements: an Array(a RPackage(** removed methods ***) a RPackage(AST-Core) ...etc... shouldUpdateTitle: false testSemaphore: a Semaphore() sourceTextAreas: an OrderedCollection(a PluggableTextMorphWithLimits(520880128)...etc... multipleMethodsEditor: a MultipleMethodsEditor(523501568) contentSelection: nil acceptor: a MethodDefinitionAcceptor classifier: a MethodClassifier categoryWidget: a CategoryWidget methodWidget: a MethodWidget [ target fileOutClass ] in AbstractNautilusUI class>>classesMenu: Receiver: AbstractNautilusUI Arguments and temporary variables: aBuilder: a PragmaMenuAndShortcutRegistration target: a NautilusUI Receiver's instance variables: superclass: AbstractTool methodDict: a MethodDictionary(size 430) format: 180 layout: a FixedLayout instanceVariables: #(#model #window #hierarchyClass #cachedHierarchy #sourceTex...etc... organization: a ClassOrganization subclasses: {NautilusUI} name: #AbstractNautilusUI classPool: a Dictionary(#ClassesIconsCache->a WeakIdentityKeyDictionary(size 46...etc... sharedPools: an OrderedCollection() environment: a SystemDictionary(lots of globals) category: #Nautilus traitComposition: {} localSelectors: nil BlockClosure>>cull: Receiver: [ target fileOutClass ] Arguments and temporary variables: anArg: a NautilusUI Receiver's instance variables: outerContext: AbstractNautilusUI class>>classesMenu: startpc: 746 numArgs: 0 [ | selArgCount | "show cursor in case item opens a new MVC window" (selArgCount := selector numArgs) = 0 ifTrue: [ target perform: selector ] ifFalse: [ selArgCount = arguments size ifTrue: [ target perform: selector withArguments: arguments ] ifFalse: [ target perform: selector withArguments: (arguments copyWith: evt) ] ]. self changed ] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Receiver: a ToggleMenuItemMorph(1004797952)'File Out' Arguments and temporary variables: evt: [(1006@833) mouseUp 3670086 nil] w: a WorldMorph(511705088) [world] selArgCount: 1 Receiver's instance variables: bounds: (900.0@832.0) corner: (1093.0@848.0) owner: a MenuMorph(360972288) submorphs: #() fullBounds: (900.0@832.0) corner: (1093.0@848.0) color: Color black extension: a MorphExtension (1034158080) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil BlockClosure>>ensure: Receiver: [ | selArgCount | "show cursor in case item opens a new MVC window" (selArgCount := selec...etc... Arguments and temporary variables: aBlock: [ oldcursor show ] complete: nil returnValue: nil Receiver's instance variables: outerContext: ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: startpc: 134 numArgs: 0 CursorWithMask(Cursor)>>showWhile: Receiver: ((CursorWithMask extent: (16@16) depth: 1 fromArray: #( 2r0 2r100000000000000000000...etc... Arguments and temporary variables: aBlock: [ | selArgCount | "show cursor in case item opens a new MVC window" (s...etc... oldcursor: ((CursorWithMask extent: (16@16) depth: 1 fromArray: #( 2r0 2...etc... Receiver's instance variables: bits: a Bitmap of length 16 width: 16 height: 16 depth: 1 offset: (-1@ -1) maskForm: Form(16x16x1) ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Receiver: a ToggleMenuItemMorph(1004797952)'File Out' Arguments and temporary variables: evt: [(1006@833) mouseUp 3670086 nil] w: a WorldMorph(511705088) [world] Receiver's instance variables: bounds: (900.0@832.0) corner: (1093.0@848.0) owner: a MenuMorph(360972288) submorphs: #() fullBounds: (900.0@832.0) corner: (1093.0@848.0) color: Color black extension: a MorphExtension (1034158080) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil ToggleMenuItemMorph(MenuItemMorph)>>mouseUp: Receiver: a ToggleMenuItemMorph(1004797952)'File Out' Arguments and temporary variables: evt: [(1006@833) mouseUp 3670086 nil] Receiver's instance variables: bounds: (900.0@832.0) corner: (1093.0@848.0) owner: a MenuMorph(360972288) submorphs: #() fullBounds: (900.0@832.0) corner: (1093.0@848.0) color: Color black extension: a MorphExtension (1034158080) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp: Receiver: a ToggleMenuItemMorph(1004797952)'File Out' Arguments and temporary variables: anEvent: [(1006@833) mouseUp 3670086 nil] Receiver's instance variables: bounds: (900.0@832.0) corner: (1093.0@848.0) owner: a MenuMorph(360972288) submorphs: #() fullBounds: (900.0@832.0) corner: (1093.0@848.0) color: Color black extension: a MorphExtension (1034158080) font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'File Out' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: [ target fileOutClass ] selector: #cull: arguments: an Array(a NautilusUI) icon: Form(14x1x8) getStateSelector: nil enablementSelector: nil keyText: nil MouseButtonEvent>>sentTo: Receiver: [(1006@833) mouseUp 3670086 nil] Arguments and temporary variables: anObject: a ToggleMenuItemMorph(1004797952)'File Out' Receiver's instance variables: timeStamp: 3670086 source: a HandMorph(760479744) windowIndex: nil type: #mouseUp buttons: 0 position: (1006@833) handler: nil wasHandled: true whichButton: 4 --- The full stack --- UTF8TextConverter>>errorMalformedInput UTF8TextConverter>>nextFromStream: MultiByteFileStream>>next MultiByteFileStream(PositionableStream)>>oldBack MultiByteFileStream(PositionableStream)>>oldPeekBack MultiByteFileStream(PositionableStream)>>backChunk WriteStream(PositionableStream)>>copyPreamble:from:at: DrGeoScriptTest class(ClassDescription)>>printMethodChunk:withPreamble:on:moveSource:toFile: [ :sel | self printMethodChunk: sel withPreamble: true on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: Array(SequenceableCollection)>>do: DrGeoScriptTest class(ClassDescription)>>fileOutCategory:on:moveSource:toFile: [ :heading | self fileOutCategory: heading on: aFileStream moveSource: moveSource toFile: fileIndex ] in DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: Array(SequenceableCollection)>>do: DrGeoScriptTest class(ClassDescription)>>fileOutOn:moveSource:toFile: DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile:initializing: DrGeoScriptTest class(Class)>>fileOutOn:moveSource:toFile: DrGeoScriptTest class(Class)>>fileOut [ :class | class theNonMetaClass fileOut ] in NautilusUI(AbstractTool)>>fileOutClasses: [ :element | aBlock value: element. bar increment ] in [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: Array(SequenceableCollection)>>do: [ :bar | aCollection do: [ :element | aBlock value: element. bar increment ] ] in NautilusUI(AbstractTool)>>do:on:displaying: BlockClosure>>cull: [ result := block cull: self ] in [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run BlockClosure>>on:do: [ self prepareForRunning. [ result := block cull: self ] on: JobNotification do: [ :notification | notification handle: self ] ] in Job>>run BlockClosure>>ensure: Job>>run NautilusUI(AbstractTool)>>do:on:displaying: NautilusUI(AbstractTool)>>fileOutClasses: NautilusUI(AbstractNautilusUI)>>fileOutClass [ target fileOutClass ] in AbstractNautilusUI class>>classesMenu: BlockClosure>>cull: [ | selArgCount | "show cursor in case item opens a new MVC window" (selArgCount := selector numArgs) = 0 ifTrue: [ target perform: selector ] ifFalse: [ selArgCount = arguments size ifTrue: [ target perform: selector withArguments: arguments ] ifFalse: [ target perform: selector withArguments: (arguments copyWith: evt) ] ]. self changed ] 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: [ ActiveHand := self. ActiveEvent := anEvent. result := focusHolder handleFocusEvent: (anEvent transformedBy: (focusHolder transformedFrom: self)) ] in HandMorph>>sendFocusEvent:to:clear: BlockClosure>>on:do: WorldMorph(PasteUpMorph)>>becomeActiveDuring: HandMorph>>sendFocusEvent:to:clear: HandMorph>>sendEvent:focus:clear: HandMorph>>sendMouseEvent: HandMorph>>handleEvent: HandMorph>>processEvents [ :h | ActiveHand := h. h processEvents. ActiveHand := nil ] in WorldState>>doOneCycleNowFor: Array(SequenceableCollection)>>do: WorldState>>handsDo: WorldState>>doOneCycleNowFor: WorldState>>doOneCycleFor: WorldMorph>>doOneCycle [ World doOneCycle. Processor yield. false ] in MorphicUIManager>>spawnNewProcess [ self value. Processor terminateActive ] in BlockClosure>>newProcess -------------------------------------------------------------------------------