[Pharo-project] StringMorph someInstance printDirectlyToDisplay -> DNU
VM: Mac OS - intel - 1058 - Squeak3.8.1 of '28 Aug 2006' [latest update: #6747] Squeak VM 4.2.1b1 Image: Pharo1.0beta [Latest update: #10440] SecurityManager state: Restricted: false FileAccess: true SocketAccess: true Working Dir /Users/ducasse/Workspace/FirstCircle/ActiveResearch/Pharo/ Pharo/pharo1.0-10440-BETAdev09.09.1 Trusted Dir /foobar/tooBar/forSqueak/bogus Untrusted Dir /Users/ducasse/Library/Preferences/Squeak/Internet/My Squeak DisplayText(Object)>>doesNotUnderstand: #form: Receiver: a DisplayText Arguments and temporary variables: aMessage: form: Form(210x20x32) exception: MessageNotUnderstood: DisplayText>>form: resumeValue: nil Receiver's instance variables: text: a Text for 'a StringMorph(133)''Preferences''' textStyle: a TextStyle DejaVu Sans offset: 0@0 form: nil foreColor: Color black backColor: Color white PSUIManager(MorphicUIManager)>>composeFormFor: Receiver: a PSUIManager Arguments and temporary variables: aDisplayText: a DisplayText canvas: a FormCanvas on: Form(210x20x32) tmpText: a TextMorph(1819) Receiver's instance variables: interactiveParser: nil DisplayText>>composeForm Receiver: a DisplayText Arguments and temporary variables: Receiver's instance variables: text: a Text for 'a StringMorph(133)''Preferences''' textStyle: a TextStyle DejaVu Sans offset: 0@0 form: nil foreColor: Color black backColor: Color white DisplayText>>form Receiver: a DisplayText Arguments and temporary variables: Receiver's instance variables: text: a Text for 'a StringMorph(133)''Preferences''' textStyle: a TextStyle DejaVu Sans offset: 0@0 form: nil foreColor: Color black backColor: Color white DisplayText>>displayOn:at:clippingBox:rule:fillColor: Receiver: a DisplayText Arguments and temporary variables: aDisplayMedium: DisplayScreen(1424x848x32) aDisplayPoint: 0@100 clipRectangle: 0@0 corner: 1424@848 ruleInteger: 3 aForm: nil form1: nil rule: nil Receiver's instance variables: text: a Text for 'a StringMorph(133)''Preferences''' textStyle: a TextStyle DejaVu Sans offset: 0@0 form: nil foreColor: Color black backColor: Color white DisplayText(DisplayObject)>>displayOn:at: Receiver: a DisplayText Arguments and temporary variables: aDisplayMedium: DisplayScreen(1424x848x32) aDisplayPoint: 0@100 Receiver's instance variables: text: a Text for 'a StringMorph(133)''Preferences''' textStyle: a TextStyle DejaVu Sans offset: 0@0 form: nil foreColor: Color black backColor: Color white ByteString(String)>>displayOn:at:textColor: Receiver: 'a StringMorph(133)''Preferences''' Arguments and temporary variables: aDisplayMedium: DisplayScreen(1424x848x32) aPoint: 0@100 aColor: Color black Receiver's instance variables: 'a StringMorph(133)''Preferences''' ByteString(String)>>displayOn:at: Receiver: 'a StringMorph(133)''Preferences''' Arguments and temporary variables: aDisplayMedium: DisplayScreen(1424x848x32) aPoint: 0@100 Receiver's instance variables: 'a StringMorph(133)''Preferences''' ByteString(String)>>displayAt: Receiver: 'a StringMorph(133)''Preferences''' Arguments and temporary variables: aPoint: 0@100 Receiver's instance variables: 'a StringMorph(133)''Preferences''' StringMorph(Object)>>printDirectlyToDisplay Receiver: a StringMorph(133)'Preferences' Arguments and temporary variables: Receiver's instance variables: bounds: 0@0 corner: 93@18 owner: an AlignmentMorph(548) submorphs: #() fullBounds: nil color: Color black extension: nil font: a LogicalFont familyName: DejaVu Serif emphasis: nil pointSize: 11 re...etc... emphasis: 0 contents: 'Preferences' hasFocus: false Object class>>DoIt Receiver: Object Arguments and temporary variables: Receiver's instance variables: superclass: ProtoObject methodDict: a MethodDictionary(size 378) format: 2 instanceVariables: nil organization: ('*Polymorph-EventEnhancements' when:send:to:exclusive: when:send...etc... subclasses: {BalloonState . StandardFileMenuResult . UndefinedObject . Boolean ...etc... name: #Object classPool: a Dictionary(#DependentsFields->a WeakIdentityKeyDictionary(size 154...etc... sharedPools: nil environment: Smalltalk category: #'Kernel-Objects' traitComposition: nil localSelectors: nil Compiler>>evaluate:in:to:notifying:ifFail:logged: Receiver: a Compiler Arguments and temporary variables: <<error during printing> Receiver's instance variables: sourceStream: a ReadWriteStream 'printDirectlyToDisplay "For debugging: write ...etc... requestor: an OBTextMorphEditorWithShout class: Object class category: nil context: nil parser: a Parser [] in OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection Receiver: an OBTextMorphEditorWithShout Arguments and temporary variables: <<error during printing> Receiver's instance variables: model: an OBDefinitionPanel paragraph: a MultiNewParagraph startBlock: a CharacterBlock with index 257 and character $" and rectangle 346....etc... stopBlock: a CharacterBlock with index 210 and character $S and rectangle 7.224...etc... beginTypeInBlock: nil emphasisHere: an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc... initialText: a Text for 'printDirectlyToDisplay "For debugging: write the rece...etc... selectionShowing: false otherInterval: (208 to: 207) lastParentLocation: nil morph: an OBTextMorphWithShout(3688) oldInterval: (210 to: 209) pivotBlock: a CharacterBlock with index 210 and character $S and rectangle 7.22...etc... inBackTo: nil BlockClosure>>on:do: Receiver: [closure] in OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection Arguments and temporary variables: exception: OutOfScopeNotification handlerAction: [closure] in OBTextMorphEditorWithShout(ParagraphEditor)>>evalua...etc... handlerActive: true Receiver's instance variables: outerContext: OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection startpc: 116 numArgs: 0 OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection Receiver: an OBTextMorphEditorWithShout Arguments and temporary variables: result: nil rcvr: Object ctxt: nil Receiver's instance variables: model: an OBDefinitionPanel paragraph: a MultiNewParagraph startBlock: a CharacterBlock with index 257 and character $" and rectangle 346....etc... stopBlock: a CharacterBlock with index 210 and character $S and rectangle 7.224...etc... beginTypeInBlock: nil emphasisHere: an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc... initialText: a Text for 'printDirectlyToDisplay "For debugging: write the rece...etc... selectionShowing: false otherInterval: (208 to: 207) lastParentLocation: nil morph: an OBTextMorphWithShout(3688) oldInterval: (210 to: 209) pivotBlock: a CharacterBlock with index 210 and character $S and rectangle 7.22...etc... inBackTo: nil OBTextMorphEditorWithShout(ParagraphEditor)>>doIt Receiver: an OBTextMorphEditorWithShout Arguments and temporary variables: Receiver's instance variables: model: an OBDefinitionPanel paragraph: a MultiNewParagraph startBlock: a CharacterBlock with index 257 and character $" and rectangle 346....etc... stopBlock: a CharacterBlock with index 210 and character $S and rectangle 7.224...etc... beginTypeInBlock: nil emphasisHere: an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc... initialText: a Text for 'printDirectlyToDisplay "For debugging: write the rece...etc... selectionShowing: false otherInterval: (208 to: 207) lastParentLocation: nil morph: an OBTextMorphWithShout(3688) oldInterval: (210 to: 209) pivotBlock: a CharacterBlock with index 210 and character $S and rectangle 7.22...etc... inBackTo: nil [] in OBTextMorphEditorWithShout(ParagraphEditor)>>doIt: Receiver: an OBTextMorphEditorWithShout Arguments and temporary variables: <<error during printing> Receiver's instance variables: model: an OBDefinitionPanel paragraph: a MultiNewParagraph startBlock: a CharacterBlock with index 257 and character $" and rectangle 346....etc... stopBlock: a CharacterBlock with index 210 and character $S and rectangle 7.224...etc... beginTypeInBlock: nil emphasisHere: an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc... initialText: a Text for 'printDirectlyToDisplay "For debugging: write the rece...etc... selectionShowing: false otherInterval: (208 to: 207) lastParentLocation: nil morph: an OBTextMorphWithShout(3688) oldInterval: (210 to: 209) pivotBlock: a CharacterBlock with index 210 and character $S and rectangle 7.22...etc... inBackTo: nil OBTextMorphEditorWithShout (ParagraphEditor)>>terminateAndInitializeAround: Receiver: an OBTextMorphEditorWithShout Arguments and temporary variables: aBlock: [closure] in OBTextMorphEditorWithShout(ParagraphEditor)>>doIt: Receiver's instance variables: model: an OBDefinitionPanel paragraph: a MultiNewParagraph startBlock: a CharacterBlock with index 257 and character $" and rectangle 346....etc... stopBlock: a CharacterBlock with index 210 and character $S and rectangle 7.224...etc... beginTypeInBlock: nil emphasisHere: an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc... initialText: a Text for 'printDirectlyToDisplay "For debugging: write the rece...etc... selectionShowing: false otherInterval: (208 to: 207) lastParentLocation: nil morph: an OBTextMorphWithShout(3688) oldInterval: (210 to: 209) pivotBlock: a CharacterBlock with index 210 and character $S and rectangle 7.22...etc... inBackTo: nil OBTextMorphEditorWithShout(ParagraphEditor)>>doIt: Receiver: an OBTextMorphEditorWithShout Arguments and temporary variables: characterStream: a WriteStream '' Receiver's instance variables: model: an OBDefinitionPanel paragraph: a MultiNewParagraph startBlock: a CharacterBlock with index 257 and character $" and rectangle 346....etc... stopBlock: a CharacterBlock with index 210 and character $S and rectangle 7.224...etc... beginTypeInBlock: nil emphasisHere: an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc... initialText: a Text for 'printDirectlyToDisplay "For debugging: write the rece...etc... selectionShowing: false otherInterval: (208 to: 207) lastParentLocation: nil morph: an OBTextMorphWithShout(3688) oldInterval: (210 to: 209) pivotBlock: a CharacterBlock with index 210 and character $S and rectangle 7.22...etc... inBackTo: nil OBTextMorphEditorWithShout(ParagraphEditor)>>dispatchOnKeyEvent:with: Receiver: an OBTextMorphEditorWithShout Arguments and temporary variables: keyEvent: [keystroke '<Cmd-d>'] typeAheadStream: a WriteStream '' honorCommandKeys: true keyValue: 100 keyChar: $d char: $d action: #doIt: Receiver's instance variables: model: an OBDefinitionPanel paragraph: a MultiNewParagraph startBlock: a CharacterBlock with index 257 and character $" and rectangle 346....etc... stopBlock: a CharacterBlock with index 210 and character $S and rectangle 7.224...etc... beginTypeInBlock: nil emphasisHere: an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc... initialText: a Text for 'printDirectlyToDisplay "For debugging: write the rece...etc... selectionShowing: false otherInterval: (208 to: 207) lastParentLocation: nil morph: an OBTextMorphWithShout(3688) oldInterval: (210 to: 209) pivotBlock: a CharacterBlock with index 210 and character $S and rectangle 7.22...etc... inBackTo: nil OBTextMorphEditorWithShout(TextMorphEditor)>>dispatchOnKeyEvent:with: Receiver: an OBTextMorphEditorWithShout Arguments and temporary variables: keyEvent: [keystroke '<Cmd-d>'] typeAheadStream: a WriteStream '' Receiver's instance variables: model: an OBDefinitionPanel paragraph: a MultiNewParagraph startBlock: a CharacterBlock with index 257 and character $" and rectangle 346....etc... stopBlock: a CharacterBlock with index 210 and character $S and rectangle 7.224...etc... beginTypeInBlock: nil emphasisHere: an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc... initialText: a Text for 'printDirectlyToDisplay "For debugging: write the rece...etc... selectionShowing: false otherInterval: (208 to: 207) lastParentLocation: nil morph: an OBTextMorphWithShout(3688) oldInterval: (210 to: 209) pivotBlock: a CharacterBlock with index 210 and character $S and rectangle 7.22...etc... inBackTo: nil OBTextMorphEditorWithShout(ParagraphEditor)>>keystroke: Receiver: an OBTextMorphEditorWithShout Arguments and temporary variables: keyEvent: [keystroke '<Cmd-d>'] typeAhead: a WriteStream '' Receiver's instance variables: model: an OBDefinitionPanel paragraph: a MultiNewParagraph startBlock: a CharacterBlock with index 257 and character $" and rectangle 346....etc... stopBlock: a CharacterBlock with index 210 and character $S and rectangle 7.224...etc... beginTypeInBlock: nil emphasisHere: an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc... initialText: a Text for 'printDirectlyToDisplay "For debugging: write the rece...etc... selectionShowing: false otherInterval: (208 to: 207) lastParentLocation: nil morph: an OBTextMorphWithShout(3688) oldInterval: (210 to: 209) pivotBlock: a CharacterBlock with index 210 and character $S and rectangle 7.22...etc... inBackTo: nil OBTextMorphEditorWithShout(TextMorphEditor)>>keystroke: Receiver: an OBTextMorphEditorWithShout Arguments and temporary variables: keyEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: model: an OBDefinitionPanel paragraph: a MultiNewParagraph startBlock: a CharacterBlock with index 257 and character $" and rectangle 346....etc... stopBlock: a CharacterBlock with index 210 and character $S and rectangle 7.224...etc... beginTypeInBlock: nil emphasisHere: an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc... initialText: a Text for 'printDirectlyToDisplay "For debugging: write the rece...etc... selectionShowing: false otherInterval: (208 to: 207) lastParentLocation: nil morph: an OBTextMorphWithShout(3688) oldInterval: (210 to: 209) pivotBlock: a CharacterBlock with index 210 and character $S and rectangle 7.22...etc... inBackTo: nil [] in [] in OBTextMorphWithShout(TextMorph)>>keyStroke: Receiver: an OBTextMorphWithShout(3688) Arguments and temporary variables: <<error during printing> Receiver's instance variables: bounds: 0@0 corner: 734@114 owner: a TransformMorph(832) submorphs: #() fullBounds: 0@0 corner: 734@114 color: Color black extension: a MorphExtension (835) [other: (blinkStart -> 2050726)] borderWidth: 0 borderColor: Color black textStyle: a TextStyle DejaVu Sans Mono text: a Text for 'printDirectlyToDisplay "For debugging: write the receiver''s...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: an OBTextMorphEditorWithShout container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editHistory: nil editView: an OBPluggableTextMorphWithShout(441) acceptOnCR: false OBTextMorphWithShout(TextMorph)>>handleInteraction: Receiver: an OBTextMorphWithShout(3688) Arguments and temporary variables: interactionBlock: [closure] in [] in OBTextMorphWithShout(TextMorph)>>keyStroke...etc... oldEditor: an OBTextMorphEditorWithShout oldParagraph: a MultiNewParagraph oldText: a Text for 'printDirectlyToDisplay "For debugging: write the receiver...etc... Receiver's instance variables: bounds: 0@0 corner: 734@114 owner: a TransformMorph(832) submorphs: #() fullBounds: 0@0 corner: 734@114 color: Color black extension: a MorphExtension (835) [other: (blinkStart -> 2050726)] borderWidth: 0 borderColor: Color black textStyle: a TextStyle DejaVu Sans Mono text: a Text for 'printDirectlyToDisplay "For debugging: write the receiver''s...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: an OBTextMorphEditorWithShout container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editHistory: nil editView: an OBPluggableTextMorphWithShout(441) acceptOnCR: false OBTextMorphWithShout(TextMorphForEditView)>>handleInteraction: Receiver: an OBTextMorphWithShout(3688) Arguments and temporary variables: interActionBlock: [closure] in [] in OBTextMorphWithShout(TextMorph)>>keyStroke...etc... Receiver's instance variables: bounds: 0@0 corner: 734@114 owner: a TransformMorph(832) submorphs: #() fullBounds: 0@0 corner: 734@114 color: Color black extension: a MorphExtension (835) [other: (blinkStart -> 2050726)] borderWidth: 0 borderColor: Color black textStyle: a TextStyle DejaVu Sans Mono text: a Text for 'printDirectlyToDisplay "For debugging: write the receiver''s...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: an OBTextMorphEditorWithShout container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editHistory: nil editView: an OBPluggableTextMorphWithShout(441) acceptOnCR: false [] in OBTextMorphWithShout(TextMorph)>>keyStroke: Receiver: an OBTextMorphWithShout(3688) Arguments and temporary variables: evt: [keystroke '<Cmd-d>'] action: nil Receiver's instance variables: bounds: 0@0 corner: 734@114 owner: a TransformMorph(832) submorphs: #() fullBounds: 0@0 corner: 734@114 color: Color black extension: a MorphExtension (835) [other: (blinkStart -> 2050726)] borderWidth: 0 borderColor: Color black textStyle: a TextStyle DejaVu Sans Mono text: a Text for 'printDirectlyToDisplay "For debugging: write the receiver''s...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: an OBTextMorphEditorWithShout container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editHistory: nil editView: an OBPluggableTextMorphWithShout(441) acceptOnCR: false ECToolSet class>>codeCompletionAround:textMorph:keyStroke: Receiver: ECToolSet Arguments and temporary variables: aBlock: [closure] in OBTextMorphWithShout(TextMorph)>>keyStroke: aTextMorph: an OBTextMorphWithShout(3688) evt: [keystroke '<Cmd-d>'] completionAllowed: true editor: an OBTextMorphEditorWithShout stringHolder: an OBDefinitionPanel Receiver's instance variables: superclass: StandardToolSet methodDict: a MethodDictionary() format: 2 instanceVariables: nil organization: ('as yet unclassified') subclasses: nil name: #ECToolSet classPool: nil sharedPools: nil environment: Smalltalk category: #'Ocompletion-ECSqueak' traitComposition: nil localSelectors: nil DEVToolSet class>>codeCompletionAround:textMorph:keyStroke: Receiver: DEVToolSet Arguments and temporary variables: aBlock: [closure] in OBTextMorphWithShout(TextMorph)>>keyStroke: aTextMorph: an OBTextMorphWithShout(3688) evt: [keystroke '<Cmd-d>'] toolSet: ECToolSet Receiver's instance variables: superclass: StandardToolSet methodDict: a MethodDictionary() format: 2 instanceVariables: nil organization: ('as yet unclassified') subclasses: nil name: #DEVToolSet classPool: nil sharedPools: nil environment: Smalltalk category: #ImageForDevelopers traitComposition: nil localSelectors: nil ToolSet class>>codeCompletionAround:textMorph:keyStroke: Receiver: ToolSet Arguments and temporary variables: aBlock: [closure] in OBTextMorphWithShout(TextMorph)>>keyStroke: aTextMorph: an OBTextMorphWithShout(3688) evt: [keystroke '<Cmd-d>'] Receiver's instance variables: superclass: AppRegistry methodDict: a MethodDictionary() format: 2 instanceVariables: nil organization: ('as yet unclassified') subclasses: nil name: #ToolSet classPool: nil sharedPools: nil environment: Smalltalk category: #'System-Applications' traitComposition: nil localSelectors: nil registeredClasses: an OrderedCollection(StandardToolSet NewInspectorToolSet DEV...etc... default: DEVToolSet OBTextMorphWithShout(TextMorph)>>keyStroke: Receiver: an OBTextMorphWithShout(3688) Arguments and temporary variables: evt: [keystroke '<Cmd-d>'] Receiver's instance variables: bounds: 0@0 corner: 734@114 owner: a TransformMorph(832) submorphs: #() fullBounds: 0@0 corner: 734@114 color: Color black extension: a MorphExtension (835) [other: (blinkStart -> 2050726)] borderWidth: 0 borderColor: Color black textStyle: a TextStyle DejaVu Sans Mono text: a Text for 'printDirectlyToDisplay "For debugging: write the receiver''s...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: an OBTextMorphEditorWithShout container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editHistory: nil editView: an OBPluggableTextMorphWithShout(441) acceptOnCR: false OBTextMorphWithShout(TextMorphForEditView)>>keyStroke: Receiver: an OBTextMorphWithShout(3688) Arguments and temporary variables: evt: [keystroke '<Cmd-d>'] view: an OBPluggableTextMorphWithShout(441) Receiver's instance variables: bounds: 0@0 corner: 734@114 owner: a TransformMorph(832) submorphs: #() fullBounds: 0@0 corner: 734@114 color: Color black extension: a MorphExtension (835) [other: (blinkStart -> 2050726)] borderWidth: 0 borderColor: Color black textStyle: a TextStyle DejaVu Sans Mono text: a Text for 'printDirectlyToDisplay "For debugging: write the receiver''s...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: an OBTextMorphEditorWithShout container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editHistory: nil editView: an OBPluggableTextMorphWithShout(441) acceptOnCR: false OBTextMorphWithShout(TextMorph)>>handleKeystroke: Receiver: an OBTextMorphWithShout(3688) Arguments and temporary variables: anEvent: [keystroke '<Cmd-d>'] pasteUp: nil Receiver's instance variables: bounds: 0@0 corner: 734@114 owner: a TransformMorph(832) submorphs: #() fullBounds: 0@0 corner: 734@114 color: Color black extension: a MorphExtension (835) [other: (blinkStart -> 2050726)] borderWidth: 0 borderColor: Color black textStyle: a TextStyle DejaVu Sans Mono text: a Text for 'printDirectlyToDisplay "For debugging: write the receiver''s...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: an OBTextMorphEditorWithShout container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editHistory: nil editView: an OBPluggableTextMorphWithShout(441) acceptOnCR: false KeyboardEvent>>sentTo: Receiver: [keystroke '<Cmd-d>'] Arguments and temporary variables: anObject: an OBTextMorphWithShout(3688) Receiver's instance variables: timeStamp: 1998226 source: a HandMorph(3216) windowIndex: nil type: #keystroke buttons: 64 position: 346@104 handler: nil wasHandled: true keyValue: 100 charCode: 100 scanCode: 2 OBTextMorphWithShout(Morph)>>handleEvent: Receiver: an OBTextMorphWithShout(3688) Arguments and temporary variables: anEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: bounds: 0@0 corner: 734@114 owner: a TransformMorph(832) submorphs: #() fullBounds: 0@0 corner: 734@114 color: Color black extension: a MorphExtension (835) [other: (blinkStart -> 2050726)] borderWidth: 0 borderColor: Color black textStyle: a TextStyle DejaVu Sans Mono text: a Text for 'printDirectlyToDisplay "For debugging: write the receiver''s...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: an OBTextMorphEditorWithShout container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editHistory: nil editView: an OBPluggableTextMorphWithShout(441) acceptOnCR: false OBTextMorphWithShout(Morph)>>handleFocusEvent: Receiver: an OBTextMorphWithShout(3688) Arguments and temporary variables: anEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: bounds: 0@0 corner: 734@114 owner: a TransformMorph(832) submorphs: #() fullBounds: 0@0 corner: 734@114 color: Color black extension: a MorphExtension (835) [other: (blinkStart -> 2050726)] borderWidth: 0 borderColor: Color black textStyle: a TextStyle DejaVu Sans Mono text: a Text for 'printDirectlyToDisplay "For debugging: write the receiver''s...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: an OBTextMorphEditorWithShout container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editHistory: nil editView: an OBPluggableTextMorphWithShout(441) acceptOnCR: false [] in HandMorph>>sendFocusEvent:to:clear: Receiver: a HandMorph(3216) Arguments and temporary variables: <<error during printing> Receiver's instance variables: bounds: 1138@524 corner: 1154@540 owner: a PasteUpMorph(1622) [world] submorphs: #() fullBounds: 1138@524 corner: 1154@540 color: Color blue extension: a MorphExtension (539) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: nil eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [1138@524 mouseUp 2090376 nil] targetOffset: 35@8 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: true temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 2090376 1138 524 0 0 0 1) lastKeyScanCode: 2 combinedChar: nil [] in PasteUpMorph>>becomeActiveDuring: Receiver: a PasteUpMorph(1622) [world] Arguments and temporary variables: <<error during printing> Receiver's instance variables: bounds: 0@0 corner: 1424@848 owner: nil submorphs: an Array(a TaskbarMorph(3095) a SystemWindow(2431) a SystemWindow(40...etc... fullBounds: 0@0 corner: 1424@848 color: (Color r: 0.97 g: 0.98 b: 1.0) extension: a MorphExtension (2543) [eventHandler = an EventHandler] [other: (...etc... borderWidth: 0 borderColor: (Color r: 0.03 g: 0.02 b: 0.0) presenter: a Presenter (1246) model: a MorphicModel(1926) cursor: 1 padding: 3 backgroundMorph: nil isPartsBin: nil autoLineLayout: false indicateCursor: nil resizeToFit: nil wantsMouseOverHalos: nil worldState: a WorldState griddingOn: nil BlockClosure>>on:do: Receiver: [closure] in PasteUpMorph>>becomeActiveDuring: Arguments and temporary variables: exception: Error handlerAction: [closure] in PasteUpMorph>>becomeActiveDuring: handlerActive: false Receiver's instance variables: outerContext: PasteUpMorph>>becomeActiveDuring: startpc: 67 numArgs: 0 --- The full stack --- DisplayText(Object)>>doesNotUnderstand: #form: PSUIManager(MorphicUIManager)>>composeFormFor: DisplayText>>composeForm DisplayText>>form DisplayText>>displayOn:at:clippingBox:rule:fillColor: DisplayText(DisplayObject)>>displayOn:at: ByteString(String)>>displayOn:at:textColor: ByteString(String)>>displayOn:at: ByteString(String)>>displayAt: StringMorph(Object)>>printDirectlyToDisplay Object class>>DoIt Compiler>>evaluate:in:to:notifying:ifFail:logged: [] in OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection BlockClosure>>on:do: OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection OBTextMorphEditorWithShout(ParagraphEditor)>>doIt [] in OBTextMorphEditorWithShout(ParagraphEditor)>>doIt: OBTextMorphEditorWithShout (ParagraphEditor)>>terminateAndInitializeAround: OBTextMorphEditorWithShout(ParagraphEditor)>>doIt: OBTextMorphEditorWithShout(ParagraphEditor)>>dispatchOnKeyEvent:with: OBTextMorphEditorWithShout(TextMorphEditor)>>dispatchOnKeyEvent:with: OBTextMorphEditorWithShout(ParagraphEditor)>>keystroke: OBTextMorphEditorWithShout(TextMorphEditor)>>keystroke: [] in [] in OBTextMorphWithShout(TextMorph)>>keyStroke: OBTextMorphWithShout(TextMorph)>>handleInteraction: OBTextMorphWithShout(TextMorphForEditView)>>handleInteraction: [] in OBTextMorphWithShout(TextMorph)>>keyStroke: ECToolSet class>>codeCompletionAround:textMorph:keyStroke: DEVToolSet class>>codeCompletionAround:textMorph:keyStroke: ToolSet class>>codeCompletionAround:textMorph:keyStroke: OBTextMorphWithShout(TextMorph)>>keyStroke: OBTextMorphWithShout(TextMorphForEditView)>>keyStroke: OBTextMorphWithShout(TextMorph)>>handleKeystroke: KeyboardEvent>>sentTo: OBTextMorphWithShout(Morph)>>handleEvent: OBTextMorphWithShout(Morph)>>handleFocusEvent: [] in HandMorph>>sendFocusEvent:to:clear: [] in PasteUpMorph>>becomeActiveDuring: BlockClosure>>on:do:
Yep. I notice about in this thread http://lists.gforge.inria.fr/pipermail/pharo-project/2009-September/013307.h... On Mon, Sep 14, 2009 at 21:30, Stéphane Ducasse <stephane.ducasse@inria.fr> wrote:
VM: Mac OS - intel - 1058 - Squeak3.8.1 of '28 Aug 2006' [latest update: #6747] Squeak VM 4.2.1b1 Image: Pharo1.0beta [Latest update: #10440]
SecurityManager state: Restricted: false FileAccess: true SocketAccess: true Working Dir /Users/ducasse/Workspace/FirstCircle/ActiveResearch/Pharo/ Pharo/pharo1.0-10440-BETAdev09.09.1 Trusted Dir /foobar/tooBar/forSqueak/bogus Untrusted Dir /Users/ducasse/Library/Preferences/Squeak/Internet/My Squeak
DisplayText(Object)>>doesNotUnderstand: #form:     Receiver: a DisplayText     Arguments and temporary variables:         aMessage:    form: Form(210x20x32)         exception:    MessageNotUnderstood: DisplayText>>form:         resumeValue:   nil     Receiver's instance variables:         text:  a Text for 'a StringMorph(133)''Preferences'''         textStyle:    a TextStyle DejaVu Sans         offset:     0@0         form:  nil         foreColor:    Color black         backColor:    Color white
PSUIManager(MorphicUIManager)>>composeFormFor:     Receiver: a PSUIManager     Arguments and temporary variables:         aDisplayText:  a DisplayText         canvas:     a FormCanvas on: Form(210x20x32)         tmpText:     a TextMorph(1819)     Receiver's instance variables:         interactiveParser:    nil
DisplayText>>composeForm     Receiver: a DisplayText     Arguments and temporary variables:
    Receiver's instance variables:         text:  a Text for 'a StringMorph(133)''Preferences'''         textStyle:    a TextStyle DejaVu Sans         offset:     0@0         form:  nil         foreColor:    Color black         backColor:    Color white
DisplayText>>form     Receiver: a DisplayText     Arguments and temporary variables:
    Receiver's instance variables:         text:  a Text for 'a StringMorph(133)''Preferences'''         textStyle:    a TextStyle DejaVu Sans         offset:     0@0         form:  nil         foreColor:    Color black         backColor:    Color white
DisplayText>>displayOn:at:clippingBox:rule:fillColor:     Receiver: a DisplayText     Arguments and temporary variables:         aDisplayMedium:     DisplayScreen(1424x848x32)         aDisplayPoint:  0@100         clipRectangle:  0@0 corner: 1424@848         ruleInteger:   3         aForm:  nil         form1:  nil         rule:  nil     Receiver's instance variables:         text:  a Text for 'a StringMorph(133)''Preferences'''         textStyle:    a TextStyle DejaVu Sans         offset:     0@0         form:  nil         foreColor:    Color black         backColor:    Color white
DisplayText(DisplayObject)>>displayOn:at:     Receiver: a DisplayText     Arguments and temporary variables:         aDisplayMedium:     DisplayScreen(1424x848x32)         aDisplayPoint:  0@100     Receiver's instance variables:         text:  a Text for 'a StringMorph(133)''Preferences'''         textStyle:    a TextStyle DejaVu Sans         offset:     0@0         form:  nil         foreColor:    Color black         backColor:    Color white
ByteString(String)>>displayOn:at:textColor:     Receiver: 'a StringMorph(133)''Preferences'''     Arguments and temporary variables:         aDisplayMedium:     DisplayScreen(1424x848x32)         aPoint:     0@100         aColor:     Color black     Receiver's instance variables: 'a StringMorph(133)''Preferences'''
ByteString(String)>>displayOn:at: Â Â Â Â Receiver: 'a StringMorph(133)''Preferences''' Â Â Â Â Arguments and temporary variables: Â Â Â Â Â Â Â Â aDisplayMedium: Â Â Â Â DisplayScreen(1424x848x32) Â Â Â Â Â Â Â Â aPoint: Â Â Â Â 0@100 Â Â Â Â Receiver's instance variables: 'a StringMorph(133)''Preferences'''
ByteString(String)>>displayAt: Â Â Â Â Receiver: 'a StringMorph(133)''Preferences''' Â Â Â Â Arguments and temporary variables: Â Â Â Â Â Â Â Â aPoint: Â Â Â Â 0@100 Â Â Â Â Receiver's instance variables: 'a StringMorph(133)''Preferences'''
StringMorph(Object)>>printDirectlyToDisplay     Receiver: a StringMorph(133)'Preferences'     Arguments and temporary variables:
    Receiver's instance variables:         bounds:     0@0 corner: 93@18         owner:  an AlignmentMorph(548)         submorphs:    #()         fullBounds:   nil         color:  Color black         extension:    nil         font:  a LogicalFont  familyName: DejaVu Serif  emphasis: nil  pointSize: 11  re...etc...         emphasis:    0         contents:    'Preferences'         hasFocus:    false
Object class>>DoIt     Receiver: Object     Arguments and temporary variables:
    Receiver's instance variables:         superclass:   ProtoObject         methodDict:   a MethodDictionary(size 378)         format:     2         instanceVariables:    nil         organization:  ('*Polymorph-EventEnhancements' when:send:to:exclusive: when:send...etc...         subclasses:   {BalloonState . StandardFileMenuResult . UndefinedObject . Boolean ...etc...         name:  #Object         classPool:    a Dictionary(#DependentsFields->a WeakIdentityKeyDictionary(size 154...etc...         sharedPools:   nil         environment:   Smalltalk         category:    #'Kernel-Objects'         traitComposition:    nil         localSelectors:     nil
Compiler>>evaluate:in:to:notifying:ifFail:logged:     Receiver: a Compiler     Arguments and temporary variables: <<error during printing>     Receiver's instance variables:         sourceStream:  a ReadWriteStream 'printDirectlyToDisplay     "For debugging: write ...etc...         requestor:    an OBTextMorphEditorWithShout         class:  Object class         category:    nil         context:     nil         parser:     a Parser
[] in OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection     Receiver: an OBTextMorphEditorWithShout     Arguments and temporary variables: <<error during printing>     Receiver's instance variables:         model:  an OBDefinitionPanel         paragraph:    a MultiNewParagraph         startBlock:   a CharacterBlock with index 257 and character $" and rectangle 346....etc...         stopBlock:    a CharacterBlock with index 210 and character $S and rectangle 7.224...etc...         beginTypeInBlock:    nil         emphasisHere:  an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc...         initialText:   a Text for 'printDirectlyToDisplay     "For debugging: write the rece...etc...         selectionShowing:    false         otherInterval:  (208 to: 207)         lastParentLocation:   nil         morph:  an OBTextMorphWithShout(3688)         oldInterval:   (210 to: 209)         pivotBlock:   a CharacterBlock with index 210 and character $S and rectangle 7.22...etc...         inBackTo:    nil
BlockClosure>>on:do:     Receiver: [closure] in OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection     Arguments and temporary variables:         exception:    OutOfScopeNotification         handlerAction:  [closure] in OBTextMorphEditorWithShout(ParagraphEditor)>>evalua...etc...         handlerActive:  true     Receiver's instance variables:         outerContext: OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection         startpc:     116         numArgs:     0
OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection     Receiver: an OBTextMorphEditorWithShout     Arguments and temporary variables:         result:     nil         rcvr:  Object         ctxt:  nil     Receiver's instance variables:         model:  an OBDefinitionPanel         paragraph:    a MultiNewParagraph         startBlock:   a CharacterBlock with index 257 and character $" and rectangle 346....etc...         stopBlock:    a CharacterBlock with index 210 and character $S and rectangle 7.224...etc...         beginTypeInBlock:    nil         emphasisHere:  an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc...         initialText:   a Text for 'printDirectlyToDisplay     "For debugging: write the rece...etc...         selectionShowing:    false         otherInterval:  (208 to: 207)         lastParentLocation:   nil         morph:  an OBTextMorphWithShout(3688)         oldInterval:   (210 to: 209)         pivotBlock:   a CharacterBlock with index 210 and character $S and rectangle 7.22...etc...         inBackTo:    nil
OBTextMorphEditorWithShout(ParagraphEditor)>>doIt     Receiver: an OBTextMorphEditorWithShout     Arguments and temporary variables:
    Receiver's instance variables:         model:  an OBDefinitionPanel         paragraph:    a MultiNewParagraph         startBlock:   a CharacterBlock with index 257 and character $" and rectangle 346....etc...         stopBlock:    a CharacterBlock with index 210 and character $S and rectangle 7.224...etc...         beginTypeInBlock:    nil         emphasisHere:  an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc...         initialText:   a Text for 'printDirectlyToDisplay     "For debugging: write the rece...etc...         selectionShowing:    false         otherInterval:  (208 to: 207)         lastParentLocation:   nil         morph:  an OBTextMorphWithShout(3688)         oldInterval:   (210 to: 209)         pivotBlock:   a CharacterBlock with index 210 and character $S and rectangle 7.22...etc...         inBackTo:    nil
[] in OBTextMorphEditorWithShout(ParagraphEditor)>>doIt:     Receiver: an OBTextMorphEditorWithShout     Arguments and temporary variables: <<error during printing>     Receiver's instance variables:         model:  an OBDefinitionPanel         paragraph:    a MultiNewParagraph         startBlock:   a CharacterBlock with index 257 and character $" and rectangle 346....etc...         stopBlock:    a CharacterBlock with index 210 and character $S and rectangle 7.224...etc...         beginTypeInBlock:    nil         emphasisHere:  an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc...         initialText:   a Text for 'printDirectlyToDisplay     "For debugging: write the rece...etc...         selectionShowing:    false         otherInterval:  (208 to: 207)         lastParentLocation:   nil         morph:  an OBTextMorphWithShout(3688)         oldInterval:   (210 to: 209)         pivotBlock:   a CharacterBlock with index 210 and character $S and rectangle 7.22...etc...         inBackTo:    nil
OBTextMorphEditorWithShout (ParagraphEditor)>>terminateAndInitializeAround:     Receiver: an OBTextMorphEditorWithShout     Arguments and temporary variables:         aBlock:     [closure] in OBTextMorphEditorWithShout(ParagraphEditor)>>doIt:     Receiver's instance variables:         model:  an OBDefinitionPanel         paragraph:    a MultiNewParagraph         startBlock:   a CharacterBlock with index 257 and character $" and rectangle 346....etc...         stopBlock:    a CharacterBlock with index 210 and character $S and rectangle 7.224...etc...         beginTypeInBlock:    nil         emphasisHere:  an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc...         initialText:   a Text for 'printDirectlyToDisplay     "For debugging: write the rece...etc...         selectionShowing:    false         otherInterval:  (208 to: 207)         lastParentLocation:   nil         morph:  an OBTextMorphWithShout(3688)         oldInterval:   (210 to: 209)         pivotBlock:   a CharacterBlock with index 210 and character $S and rectangle 7.22...etc...         inBackTo:    nil
OBTextMorphEditorWithShout(ParagraphEditor)>>doIt:     Receiver: an OBTextMorphEditorWithShout     Arguments and temporary variables:         characterStream:     a WriteStream ''     Receiver's instance variables:         model:  an OBDefinitionPanel         paragraph:    a MultiNewParagraph         startBlock:   a CharacterBlock with index 257 and character $" and rectangle 346....etc...         stopBlock:    a CharacterBlock with index 210 and character $S and rectangle 7.224...etc...         beginTypeInBlock:    nil         emphasisHere:  an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc...         initialText:   a Text for 'printDirectlyToDisplay     "For debugging: write the rece...etc...         selectionShowing:    false         otherInterval:  (208 to: 207)         lastParentLocation:   nil         morph:  an OBTextMorphWithShout(3688)         oldInterval:   (210 to: 209)         pivotBlock:   a CharacterBlock with index 210 and character $S and rectangle 7.22...etc...         inBackTo:    nil
OBTextMorphEditorWithShout(ParagraphEditor)>>dispatchOnKeyEvent:with:     Receiver: an OBTextMorphEditorWithShout     Arguments and temporary variables:         keyEvent:    [keystroke '<Cmd-d>']         typeAheadStream:     a WriteStream ''         honorCommandKeys:    true         keyValue:    100         keyChar:     $d         char:  $d         action:     #doIt:     Receiver's instance variables:         model:  an OBDefinitionPanel         paragraph:    a MultiNewParagraph         startBlock:   a CharacterBlock with index 257 and character $" and rectangle 346....etc...         stopBlock:    a CharacterBlock with index 210 and character $S and rectangle 7.224...etc...         beginTypeInBlock:    nil         emphasisHere:  an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc...         initialText:   a Text for 'printDirectlyToDisplay     "For debugging: write the rece...etc...         selectionShowing:    false         otherInterval:  (208 to: 207)         lastParentLocation:   nil         morph:  an OBTextMorphWithShout(3688)         oldInterval:   (210 to: 209)         pivotBlock:   a CharacterBlock with index 210 and character $S and rectangle 7.22...etc...         inBackTo:    nil
OBTextMorphEditorWithShout(TextMorphEditor)>>dispatchOnKeyEvent:with:     Receiver: an OBTextMorphEditorWithShout     Arguments and temporary variables:         keyEvent:    [keystroke '<Cmd-d>']         typeAheadStream:     a WriteStream ''     Receiver's instance variables:         model:  an OBDefinitionPanel         paragraph:    a MultiNewParagraph         startBlock:   a CharacterBlock with index 257 and character $" and rectangle 346....etc...         stopBlock:    a CharacterBlock with index 210 and character $S and rectangle 7.224...etc...         beginTypeInBlock:    nil         emphasisHere:  an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc...         initialText:   a Text for 'printDirectlyToDisplay     "For debugging: write the rece...etc...         selectionShowing:    false         otherInterval:  (208 to: 207)         lastParentLocation:   nil         morph:  an OBTextMorphWithShout(3688)         oldInterval:   (210 to: 209)         pivotBlock:   a CharacterBlock with index 210 and character $S and rectangle 7.22...etc...         inBackTo:    nil
OBTextMorphEditorWithShout(ParagraphEditor)>>keystroke:     Receiver: an OBTextMorphEditorWithShout     Arguments and temporary variables:         keyEvent:    [keystroke '<Cmd-d>']         typeAhead:    a WriteStream ''     Receiver's instance variables:         model:  an OBDefinitionPanel         paragraph:    a MultiNewParagraph         startBlock:   a CharacterBlock with index 257 and character $" and rectangle 346....etc...         stopBlock:    a CharacterBlock with index 210 and character $S and rectangle 7.224...etc...         beginTypeInBlock:    nil         emphasisHere:  an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc...         initialText:   a Text for 'printDirectlyToDisplay     "For debugging: write the rece...etc...         selectionShowing:    false         otherInterval:  (208 to: 207)         lastParentLocation:   nil         morph:  an OBTextMorphWithShout(3688)         oldInterval:   (210 to: 209)         pivotBlock:   a CharacterBlock with index 210 and character $S and rectangle 7.22...etc...         inBackTo:    nil
OBTextMorphEditorWithShout(TextMorphEditor)>>keystroke:     Receiver: an OBTextMorphEditorWithShout     Arguments and temporary variables:         keyEvent:    [keystroke '<Cmd-d>']     Receiver's instance variables:         model:  an OBDefinitionPanel         paragraph:    a MultiNewParagraph         startBlock:   a CharacterBlock with index 257 and character $" and rectangle 346....etc...         stopBlock:    a CharacterBlock with index 210 and character $S and rectangle 7.224...etc...         beginTypeInBlock:    nil         emphasisHere:  an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc...         initialText:   a Text for 'printDirectlyToDisplay     "For debugging: write the rece...etc...         selectionShowing:    false         otherInterval:  (208 to: 207)         lastParentLocation:   nil         morph:  an OBTextMorphWithShout(3688)         oldInterval:   (210 to: 209)         pivotBlock:   a CharacterBlock with index 210 and character $S and rectangle 7.22...etc...         inBackTo:    nil
[] in [] in OBTextMorphWithShout(TextMorph)>>keyStroke:     Receiver: an OBTextMorphWithShout(3688)     Arguments and temporary variables: <<error during printing>     Receiver's instance variables:         bounds:     0@0 corner: 734@114         owner:  a TransformMorph(832)         submorphs:    #()         fullBounds:   0@0 corner: 734@114         color:  Color black         extension:    a MorphExtension (835) [other:  (blinkStart -> 2050726)]         borderWidth:   0         borderColor:   Color black         textStyle:    a TextStyle DejaVu Sans Mono         text:  a Text for 'printDirectlyToDisplay     "For debugging: write the receiver''s...etc...         wrapFlag:    true         paragraph:    a MultiNewParagraph         editor:     an OBTextMorphEditorWithShout         container:    nil         predecessor:   nil         successor:    nil         backgroundColor:     nil         margins:     nil         editHistory:   nil         editView:    an OBPluggableTextMorphWithShout(441)         acceptOnCR:   false
OBTextMorphWithShout(TextMorph)>>handleInteraction:     Receiver: an OBTextMorphWithShout(3688)     Arguments and temporary variables:         interactionBlock:    [closure] in [] in OBTextMorphWithShout(TextMorph)>>keyStroke...etc...         oldEditor:    an OBTextMorphEditorWithShout         oldParagraph:  a MultiNewParagraph         oldText:     a Text for 'printDirectlyToDisplay     "For debugging: write the receiver...etc...     Receiver's instance variables:         bounds:     0@0 corner: 734@114         owner:  a TransformMorph(832)         submorphs:    #()         fullBounds:   0@0 corner: 734@114         color:  Color black         extension:    a MorphExtension (835) [other:  (blinkStart -> 2050726)]         borderWidth:   0         borderColor:   Color black         textStyle:    a TextStyle DejaVu Sans Mono         text:  a Text for 'printDirectlyToDisplay     "For debugging: write the receiver''s...etc...         wrapFlag:    true         paragraph:    a MultiNewParagraph         editor:     an OBTextMorphEditorWithShout         container:    nil         predecessor:   nil         successor:    nil         backgroundColor:     nil         margins:     nil         editHistory:   nil         editView:    an OBPluggableTextMorphWithShout(441)         acceptOnCR:   false
OBTextMorphWithShout(TextMorphForEditView)>>handleInteraction:     Receiver: an OBTextMorphWithShout(3688)     Arguments and temporary variables:         interActionBlock:    [closure] in [] in OBTextMorphWithShout(TextMorph)>>keyStroke...etc...     Receiver's instance variables:         bounds:     0@0 corner: 734@114         owner:  a TransformMorph(832)         submorphs:    #()         fullBounds:   0@0 corner: 734@114         color:  Color black         extension:    a MorphExtension (835) [other:  (blinkStart -> 2050726)]         borderWidth:   0         borderColor:   Color black         textStyle:    a TextStyle DejaVu Sans Mono         text:  a Text for 'printDirectlyToDisplay     "For debugging: write the receiver''s...etc...         wrapFlag:    true         paragraph:    a MultiNewParagraph         editor:     an OBTextMorphEditorWithShout         container:    nil         predecessor:   nil         successor:    nil         backgroundColor:     nil         margins:     nil         editHistory:   nil         editView:    an OBPluggableTextMorphWithShout(441)         acceptOnCR:   false
[] in OBTextMorphWithShout(TextMorph)>>keyStroke:     Receiver: an OBTextMorphWithShout(3688)     Arguments and temporary variables:         evt:   [keystroke '<Cmd-d>']         action:     nil     Receiver's instance variables:         bounds:     0@0 corner: 734@114         owner:  a TransformMorph(832)         submorphs:    #()         fullBounds:   0@0 corner: 734@114         color:  Color black         extension:    a MorphExtension (835) [other:  (blinkStart -> 2050726)]         borderWidth:   0         borderColor:   Color black         textStyle:    a TextStyle DejaVu Sans Mono         text:  a Text for 'printDirectlyToDisplay     "For debugging: write the receiver''s...etc...         wrapFlag:    true         paragraph:    a MultiNewParagraph         editor:     an OBTextMorphEditorWithShout         container:    nil         predecessor:   nil         successor:    nil         backgroundColor:     nil         margins:     nil         editHistory:   nil         editView:    an OBPluggableTextMorphWithShout(441)         acceptOnCR:   false
ECToolSet class>>codeCompletionAround:textMorph:keyStroke:     Receiver: ECToolSet     Arguments and temporary variables:         aBlock:     [closure] in OBTextMorphWithShout(TextMorph)>>keyStroke:         aTextMorph:   an OBTextMorphWithShout(3688)         evt:   [keystroke '<Cmd-d>']         completionAllowed:    true         editor:     an OBTextMorphEditorWithShout         stringHolder:  an OBDefinitionPanel     Receiver's instance variables:         superclass:   StandardToolSet         methodDict:   a MethodDictionary()         format:     2         instanceVariables:    nil         organization:  ('as yet unclassified')
        subclasses:   nil         name:  #ECToolSet         classPool:    nil         sharedPools:   nil         environment:   Smalltalk         category:    #'Ocompletion-ECSqueak'         traitComposition:    nil         localSelectors:     nil
DEVToolSet class>>codeCompletionAround:textMorph:keyStroke:     Receiver: DEVToolSet     Arguments and temporary variables:         aBlock:     [closure] in OBTextMorphWithShout(TextMorph)>>keyStroke:         aTextMorph:   an OBTextMorphWithShout(3688)         evt:   [keystroke '<Cmd-d>']         toolSet:     ECToolSet     Receiver's instance variables:         superclass:   StandardToolSet         methodDict:   a MethodDictionary()         format:     2         instanceVariables:    nil         organization:  ('as yet unclassified')
        subclasses:   nil         name:  #DEVToolSet         classPool:    nil         sharedPools:   nil         environment:   Smalltalk         category:    #ImageForDevelopers         traitComposition:    nil         localSelectors:     nil
ToolSet class>>codeCompletionAround:textMorph:keyStroke:     Receiver: ToolSet     Arguments and temporary variables:         aBlock:     [closure] in OBTextMorphWithShout(TextMorph)>>keyStroke:         aTextMorph:   an OBTextMorphWithShout(3688)         evt:   [keystroke '<Cmd-d>']     Receiver's instance variables:         superclass:   AppRegistry         methodDict:   a MethodDictionary()         format:     2         instanceVariables:    nil         organization:  ('as yet unclassified')
        subclasses:   nil         name:  #ToolSet         classPool:    nil         sharedPools:   nil         environment:   Smalltalk         category:    #'System-Applications'         traitComposition:    nil         localSelectors:     nil         registeredClasses:    an OrderedCollection(StandardToolSet NewInspectorToolSet DEV...etc...         default:     DEVToolSet
OBTextMorphWithShout(TextMorph)>>keyStroke:     Receiver: an OBTextMorphWithShout(3688)     Arguments and temporary variables:         evt:   [keystroke '<Cmd-d>']     Receiver's instance variables:         bounds:     0@0 corner: 734@114         owner:  a TransformMorph(832)         submorphs:    #()         fullBounds:   0@0 corner: 734@114         color:  Color black         extension:    a MorphExtension (835) [other:  (blinkStart -> 2050726)]         borderWidth:   0         borderColor:   Color black         textStyle:    a TextStyle DejaVu Sans Mono         text:  a Text for 'printDirectlyToDisplay     "For debugging: write the receiver''s...etc...         wrapFlag:    true         paragraph:    a MultiNewParagraph         editor:     an OBTextMorphEditorWithShout         container:    nil         predecessor:   nil         successor:    nil         backgroundColor:     nil         margins:     nil         editHistory:   nil         editView:    an OBPluggableTextMorphWithShout(441)         acceptOnCR:   false
OBTextMorphWithShout(TextMorphForEditView)>>keyStroke:     Receiver: an OBTextMorphWithShout(3688)     Arguments and temporary variables:         evt:   [keystroke '<Cmd-d>']         view:  an OBPluggableTextMorphWithShout(441)     Receiver's instance variables:         bounds:     0@0 corner: 734@114         owner:  a TransformMorph(832)         submorphs:    #()         fullBounds:   0@0 corner: 734@114         color:  Color black         extension:    a MorphExtension (835) [other:  (blinkStart -> 2050726)]         borderWidth:   0         borderColor:   Color black         textStyle:    a TextStyle DejaVu Sans Mono         text:  a Text for 'printDirectlyToDisplay     "For debugging: write the receiver''s...etc...         wrapFlag:    true         paragraph:    a MultiNewParagraph         editor:     an OBTextMorphEditorWithShout         container:    nil         predecessor:   nil         successor:    nil         backgroundColor:     nil         margins:     nil         editHistory:   nil         editView:    an OBPluggableTextMorphWithShout(441)         acceptOnCR:   false
OBTextMorphWithShout(TextMorph)>>handleKeystroke:     Receiver: an OBTextMorphWithShout(3688)     Arguments and temporary variables:         anEvent:     [keystroke '<Cmd-d>']         pasteUp:     nil     Receiver's instance variables:         bounds:     0@0 corner: 734@114         owner:  a TransformMorph(832)         submorphs:    #()         fullBounds:   0@0 corner: 734@114         color:  Color black         extension:    a MorphExtension (835) [other:  (blinkStart -> 2050726)]         borderWidth:   0         borderColor:   Color black         textStyle:    a TextStyle DejaVu Sans Mono         text:  a Text for 'printDirectlyToDisplay     "For debugging: write the receiver''s...etc...         wrapFlag:    true         paragraph:    a MultiNewParagraph         editor:     an OBTextMorphEditorWithShout         container:    nil         predecessor:   nil         successor:    nil         backgroundColor:     nil         margins:     nil         editHistory:   nil         editView:    an OBPluggableTextMorphWithShout(441)         acceptOnCR:   false
KeyboardEvent>>sentTo:     Receiver: [keystroke '<Cmd-d>']     Arguments and temporary variables:         anObject:    an OBTextMorphWithShout(3688)     Receiver's instance variables:         timeStamp:    1998226         source:     a HandMorph(3216)         windowIndex:   nil         type:  #keystroke         buttons:     64         position:    346@104         handler:     nil         wasHandled:   true         keyValue:    100         charCode:    100         scanCode:    2
OBTextMorphWithShout(Morph)>>handleEvent:     Receiver: an OBTextMorphWithShout(3688)     Arguments and temporary variables:         anEvent:     [keystroke '<Cmd-d>']     Receiver's instance variables:         bounds:     0@0 corner: 734@114         owner:  a TransformMorph(832)         submorphs:    #()         fullBounds:   0@0 corner: 734@114         color:  Color black         extension:    a MorphExtension (835) [other:  (blinkStart -> 2050726)]         borderWidth:   0         borderColor:   Color black         textStyle:    a TextStyle DejaVu Sans Mono         text:  a Text for 'printDirectlyToDisplay     "For debugging: write the receiver''s...etc...         wrapFlag:    true         paragraph:    a MultiNewParagraph         editor:     an OBTextMorphEditorWithShout         container:    nil         predecessor:   nil         successor:    nil         backgroundColor:     nil         margins:     nil         editHistory:   nil         editView:    an OBPluggableTextMorphWithShout(441)         acceptOnCR:   false
OBTextMorphWithShout(Morph)>>handleFocusEvent:     Receiver: an OBTextMorphWithShout(3688)     Arguments and temporary variables:         anEvent:     [keystroke '<Cmd-d>']     Receiver's instance variables:         bounds:     0@0 corner: 734@114         owner:  a TransformMorph(832)         submorphs:    #()         fullBounds:   0@0 corner: 734@114         color:  Color black         extension:    a MorphExtension (835) [other:  (blinkStart -> 2050726)]         borderWidth:   0         borderColor:   Color black         textStyle:    a TextStyle DejaVu Sans Mono         text:  a Text for 'printDirectlyToDisplay     "For debugging: write the receiver''s...etc...         wrapFlag:    true         paragraph:    a MultiNewParagraph         editor:     an OBTextMorphEditorWithShout         container:    nil         predecessor:   nil         successor:    nil         backgroundColor:     nil         margins:     nil         editHistory:   nil         editView:    an OBPluggableTextMorphWithShout(441)         acceptOnCR:   false
[] in HandMorph>>sendFocusEvent:to:clear:     Receiver: a HandMorph(3216)     Arguments and temporary variables: <<error during printing>     Receiver's instance variables:         bounds:     1138@524 corner: 1154@540         owner:  a PasteUpMorph(1622) [world]         submorphs:    #()         fullBounds:   1138@524 corner: 1154@540         color:  Color blue         extension:    a MorphExtension (539) [eventHandler = an EventHandler]         mouseFocus:   nil         keyboardFocus:  nil         eventListeners:     nil         mouseListeners:     nil         keyboardListeners:    nil         mouseClickState:     nil         mouseOverHandler:    a MouseOverHandler         lastMouseEvent:     [1138@524 mouseUp 2090376 nil]         targetOffset:  35@8         damageRecorder:     a DamageRecorder         cacheCanvas:   nil         cachedCanvasHasHoles:  true         temporaryCursor:     nil         temporaryCursorOffset:  nil         hardwareCursor:     nil         hasChanged:   true         savedPatch:   nil         userInitials:  ''         lastEventBuffer:     #(1 2090376 1138 524 0 0 0 1)         lastKeyScanCode:     2         combinedChar:  nil
[] in PasteUpMorph>>becomeActiveDuring:     Receiver: a PasteUpMorph(1622) [world]     Arguments and temporary variables: <<error during printing>     Receiver's instance variables:         bounds:     0@0 corner: 1424@848         owner:  nil         submorphs:    an Array(a TaskbarMorph(3095) a SystemWindow(2431) a SystemWindow(40...etc...         fullBounds:   0@0 corner: 1424@848         color:  (Color r: 0.97 g: 0.98 b: 1.0)         extension:    a MorphExtension (2543) [eventHandler = an EventHandler]  [other:  (...etc...         borderWidth:   0         borderColor:   (Color r: 0.03 g: 0.02 b: 0.0)         presenter:    a Presenter (1246)         model:  a MorphicModel(1926)         cursor:     1         padding:     3         backgroundMorph:     nil         isPartsBin:   nil         autoLineLayout:     false         indicateCursor:     nil         resizeToFit:   nil         wantsMouseOverHalos:   nil         worldState:   a WorldState         griddingOn:   nil
BlockClosure>>on:do:     Receiver: [closure] in PasteUpMorph>>becomeActiveDuring:     Arguments and temporary variables:         exception:    Error         handlerAction:  [closure] in PasteUpMorph>>becomeActiveDuring:         handlerActive:  false     Receiver's instance variables:         outerContext:  PasteUpMorph>>becomeActiveDuring:         startpc:     67         numArgs:     0
--- The full stack --- DisplayText(Object)>>doesNotUnderstand: #form: PSUIManager(MorphicUIManager)>>composeFormFor: DisplayText>>composeForm DisplayText>>form DisplayText>>displayOn:at:clippingBox:rule:fillColor: DisplayText(DisplayObject)>>displayOn:at: ByteString(String)>>displayOn:at:textColor: ByteString(String)>>displayOn:at: ByteString(String)>>displayAt: StringMorph(Object)>>printDirectlyToDisplay Object class>>DoIt Compiler>>evaluate:in:to:notifying:ifFail:logged: [] in OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection BlockClosure>>on:do: OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection OBTextMorphEditorWithShout(ParagraphEditor)>>doIt [] in OBTextMorphEditorWithShout(ParagraphEditor)>>doIt: OBTextMorphEditorWithShout (ParagraphEditor)>>terminateAndInitializeAround: OBTextMorphEditorWithShout(ParagraphEditor)>>doIt: OBTextMorphEditorWithShout(ParagraphEditor)>>dispatchOnKeyEvent:with: OBTextMorphEditorWithShout(TextMorphEditor)>>dispatchOnKeyEvent:with: OBTextMorphEditorWithShout(ParagraphEditor)>>keystroke: OBTextMorphEditorWithShout(TextMorphEditor)>>keystroke: [] in [] in OBTextMorphWithShout(TextMorph)>>keyStroke: OBTextMorphWithShout(TextMorph)>>handleInteraction: OBTextMorphWithShout(TextMorphForEditView)>>handleInteraction: [] in OBTextMorphWithShout(TextMorph)>>keyStroke: ECToolSet class>>codeCompletionAround:textMorph:keyStroke: DEVToolSet class>>codeCompletionAround:textMorph:keyStroke: ToolSet class>>codeCompletionAround:textMorph:keyStroke: OBTextMorphWithShout(TextMorph)>>keyStroke: OBTextMorphWithShout(TextMorphForEditView)>>keyStroke: OBTextMorphWithShout(TextMorph)>>handleKeystroke: KeyboardEvent>>sentTo: OBTextMorphWithShout(Morph)>>handleEvent: OBTextMorphWithShout(Morph)>>handleFocusEvent: [] in HandMorph>>sendFocusEvent:to:clear: [] in PasteUpMorph>>becomeActiveDuring: BlockClosure>>on:do:
_______________________________________________ Pharo-project mailing list Pharo-project@lists.gforge.inria.fr http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project
thanks. On Sep 14, 2009, at 8:17 PM, Andrey Larionov wrote:
Yep. I notice about in this thread http://lists.gforge.inria.fr/pipermail/pharo-project/2009-September/013307.h...
On Mon, Sep 14, 2009 at 21:30, Stéphane Ducasse <stephane.ducasse@inria.fr> wrote:
VM: Mac OS - intel - 1058 - Squeak3.8.1 of '28 Aug 2006' [latest update: #6747] Squeak VM 4.2.1b1 Image: Pharo1.0beta [Latest update: #10440]
SecurityManager state: Restricted: false FileAccess: true SocketAccess: true Working Dir /Users/ducasse/Workspace/FirstCircle/ActiveResearch/ Pharo/ Pharo/pharo1.0-10440-BETAdev09.09.1 Trusted Dir /foobar/tooBar/forSqueak/bogus Untrusted Dir /Users/ducasse/Library/Preferences/Squeak/Internet/My Squeak
DisplayText(Object)>>doesNotUnderstand: #form: Receiver: a DisplayText Arguments and temporary variables: aMessage: form: Form(210x20x32) exception: MessageNotUnderstood: DisplayText>>form: resumeValue: nil Receiver's instance variables: text: a Text for 'a StringMorph(133)''Preferences''' textStyle: a TextStyle DejaVu Sans offset: 0@0 form: nil foreColor: Color black backColor: Color white
PSUIManager(MorphicUIManager)>>composeFormFor: Receiver: a PSUIManager Arguments and temporary variables: aDisplayText: a DisplayText canvas: a FormCanvas on: Form(210x20x32) tmpText: a TextMorph(1819) Receiver's instance variables: interactiveParser: nil
DisplayText>>composeForm Receiver: a DisplayText Arguments and temporary variables:
Receiver's instance variables: text: a Text for 'a StringMorph(133)''Preferences''' textStyle: a TextStyle DejaVu Sans offset: 0@0 form: nil foreColor: Color black backColor: Color white
DisplayText>>form Receiver: a DisplayText Arguments and temporary variables:
Receiver's instance variables: text: a Text for 'a StringMorph(133)''Preferences''' textStyle: a TextStyle DejaVu Sans offset: 0@0 form: nil foreColor: Color black backColor: Color white
DisplayText>>displayOn:at:clippingBox:rule:fillColor: Receiver: a DisplayText Arguments and temporary variables: aDisplayMedium: DisplayScreen(1424x848x32) aDisplayPoint: 0@100 clipRectangle: 0@0 corner: 1424@848 ruleInteger: 3 aForm: nil form1: nil rule: nil Receiver's instance variables: text: a Text for 'a StringMorph(133)''Preferences''' textStyle: a TextStyle DejaVu Sans offset: 0@0 form: nil foreColor: Color black backColor: Color white
DisplayText(DisplayObject)>>displayOn:at: Receiver: a DisplayText Arguments and temporary variables: aDisplayMedium: DisplayScreen(1424x848x32) aDisplayPoint: 0@100 Receiver's instance variables: text: a Text for 'a StringMorph(133)''Preferences''' textStyle: a TextStyle DejaVu Sans offset: 0@0 form: nil foreColor: Color black backColor: Color white
ByteString(String)>>displayOn:at:textColor: Receiver: 'a StringMorph(133)''Preferences''' Arguments and temporary variables: aDisplayMedium: DisplayScreen(1424x848x32) aPoint: 0@100 aColor: Color black Receiver's instance variables: 'a StringMorph(133)''Preferences'''
ByteString(String)>>displayOn:at: Receiver: 'a StringMorph(133)''Preferences''' Arguments and temporary variables: aDisplayMedium: DisplayScreen(1424x848x32) aPoint: 0@100 Receiver's instance variables: 'a StringMorph(133)''Preferences'''
ByteString(String)>>displayAt: Receiver: 'a StringMorph(133)''Preferences''' Arguments and temporary variables: aPoint: 0@100 Receiver's instance variables: 'a StringMorph(133)''Preferences'''
StringMorph(Object)>>printDirectlyToDisplay Receiver: a StringMorph(133)'Preferences' Arguments and temporary variables:
Receiver's instance variables: bounds: 0@0 corner: 93@18 owner: an AlignmentMorph(548) submorphs: #() fullBounds: nil color: Color black extension: nil font: a LogicalFont familyName: DejaVu Serif emphasis: nil pointSize: 11 re...etc... emphasis: 0 contents: 'Preferences' hasFocus: false
Object class>>DoIt Receiver: Object Arguments and temporary variables:
Receiver's instance variables: superclass: ProtoObject methodDict: a MethodDictionary(size 378) format: 2 instanceVariables: nil organization: ('*Polymorph-EventEnhancements' when:send:to:exclusive: when:send...etc... subclasses: {BalloonState . StandardFileMenuResult . UndefinedObject . Boolean ...etc... name: #Object classPool: a Dictionary(#DependentsFields->a WeakIdentityKeyDictionary(size 154...etc... sharedPools: nil environment: Smalltalk category: #'Kernel-Objects' traitComposition: nil localSelectors: nil
Compiler>>evaluate:in:to:notifying:ifFail:logged: Receiver: a Compiler Arguments and temporary variables: <<error during printing> Receiver's instance variables: sourceStream: a ReadWriteStream 'printDirectlyToDisplay "For debugging: write ...etc... requestor: an OBTextMorphEditorWithShout class: Object class category: nil context: nil parser: a Parser
[] in OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection Receiver: an OBTextMorphEditorWithShout Arguments and temporary variables: <<error during printing> Receiver's instance variables: model: an OBDefinitionPanel paragraph: a MultiNewParagraph startBlock: a CharacterBlock with index 257 and character $" and rectangle 346....etc... stopBlock: a CharacterBlock with index 210 and character $S and rectangle 7.224...etc... beginTypeInBlock: nil emphasisHere: an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc... initialText: a Text for 'printDirectlyToDisplay "For debugging: write the rece...etc... selectionShowing: false otherInterval: (208 to: 207) lastParentLocation: nil morph: an OBTextMorphWithShout(3688) oldInterval: (210 to: 209) pivotBlock: a CharacterBlock with index 210 and character $S and rectangle 7.22...etc... inBackTo: nil
BlockClosure>>on:do: Receiver: [closure] in OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection Arguments and temporary variables: exception: OutOfScopeNotification handlerAction: [closure] in OBTextMorphEditorWithShout(ParagraphEditor)>>evalua...etc... handlerActive: true Receiver's instance variables: outerContext: OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection startpc: 116 numArgs: 0
OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection Receiver: an OBTextMorphEditorWithShout Arguments and temporary variables: result: nil rcvr: Object ctxt: nil Receiver's instance variables: model: an OBDefinitionPanel paragraph: a MultiNewParagraph startBlock: a CharacterBlock with index 257 and character $" and rectangle 346....etc... stopBlock: a CharacterBlock with index 210 and character $S and rectangle 7.224...etc... beginTypeInBlock: nil emphasisHere: an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc... initialText: a Text for 'printDirectlyToDisplay "For debugging: write the rece...etc... selectionShowing: false otherInterval: (208 to: 207) lastParentLocation: nil morph: an OBTextMorphWithShout(3688) oldInterval: (210 to: 209) pivotBlock: a CharacterBlock with index 210 and character $S and rectangle 7.22...etc... inBackTo: nil
OBTextMorphEditorWithShout(ParagraphEditor)>>doIt Receiver: an OBTextMorphEditorWithShout Arguments and temporary variables:
Receiver's instance variables: model: an OBDefinitionPanel paragraph: a MultiNewParagraph startBlock: a CharacterBlock with index 257 and character $" and rectangle 346....etc... stopBlock: a CharacterBlock with index 210 and character $S and rectangle 7.224...etc... beginTypeInBlock: nil emphasisHere: an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc... initialText: a Text for 'printDirectlyToDisplay "For debugging: write the rece...etc... selectionShowing: false otherInterval: (208 to: 207) lastParentLocation: nil morph: an OBTextMorphWithShout(3688) oldInterval: (210 to: 209) pivotBlock: a CharacterBlock with index 210 and character $S and rectangle 7.22...etc... inBackTo: nil
[] in OBTextMorphEditorWithShout(ParagraphEditor)>>doIt: Receiver: an OBTextMorphEditorWithShout Arguments and temporary variables: <<error during printing> Receiver's instance variables: model: an OBDefinitionPanel paragraph: a MultiNewParagraph startBlock: a CharacterBlock with index 257 and character $" and rectangle 346....etc... stopBlock: a CharacterBlock with index 210 and character $S and rectangle 7.224...etc... beginTypeInBlock: nil emphasisHere: an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc... initialText: a Text for 'printDirectlyToDisplay "For debugging: write the rece...etc... selectionShowing: false otherInterval: (208 to: 207) lastParentLocation: nil morph: an OBTextMorphWithShout(3688) oldInterval: (210 to: 209) pivotBlock: a CharacterBlock with index 210 and character $S and rectangle 7.22...etc... inBackTo: nil
OBTextMorphEditorWithShout (ParagraphEditor)>>terminateAndInitializeAround: Receiver: an OBTextMorphEditorWithShout Arguments and temporary variables: aBlock: [closure] in OBTextMorphEditorWithShout(ParagraphEditor)>>doIt: Receiver's instance variables: model: an OBDefinitionPanel paragraph: a MultiNewParagraph startBlock: a CharacterBlock with index 257 and character $" and rectangle 346....etc... stopBlock: a CharacterBlock with index 210 and character $S and rectangle 7.224...etc... beginTypeInBlock: nil emphasisHere: an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc... initialText: a Text for 'printDirectlyToDisplay "For debugging: write the rece...etc... selectionShowing: false otherInterval: (208 to: 207) lastParentLocation: nil morph: an OBTextMorphWithShout(3688) oldInterval: (210 to: 209) pivotBlock: a CharacterBlock with index 210 and character $S and rectangle 7.22...etc... inBackTo: nil
OBTextMorphEditorWithShout(ParagraphEditor)>>doIt: Receiver: an OBTextMorphEditorWithShout Arguments and temporary variables: characterStream: a WriteStream '' Receiver's instance variables: model: an OBDefinitionPanel paragraph: a MultiNewParagraph startBlock: a CharacterBlock with index 257 and character $" and rectangle 346....etc... stopBlock: a CharacterBlock with index 210 and character $S and rectangle 7.224...etc... beginTypeInBlock: nil emphasisHere: an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc... initialText: a Text for 'printDirectlyToDisplay "For debugging: write the rece...etc... selectionShowing: false otherInterval: (208 to: 207) lastParentLocation: nil morph: an OBTextMorphWithShout(3688) oldInterval: (210 to: 209) pivotBlock: a CharacterBlock with index 210 and character $S and rectangle 7.22...etc... inBackTo: nil
OBTextMorphEditorWithShout(ParagraphEditor)>>dispatchOnKeyEvent:with: Receiver: an OBTextMorphEditorWithShout Arguments and temporary variables: keyEvent: [keystroke '<Cmd-d>'] typeAheadStream: a WriteStream '' honorCommandKeys: true keyValue: 100 keyChar: $d char: $d action: #doIt: Receiver's instance variables: model: an OBDefinitionPanel paragraph: a MultiNewParagraph startBlock: a CharacterBlock with index 257 and character $" and rectangle 346....etc... stopBlock: a CharacterBlock with index 210 and character $S and rectangle 7.224...etc... beginTypeInBlock: nil emphasisHere: an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc... initialText: a Text for 'printDirectlyToDisplay "For debugging: write the rece...etc... selectionShowing: false otherInterval: (208 to: 207) lastParentLocation: nil morph: an OBTextMorphWithShout(3688) oldInterval: (210 to: 209) pivotBlock: a CharacterBlock with index 210 and character $S and rectangle 7.22...etc... inBackTo: nil
OBTextMorphEditorWithShout(TextMorphEditor)>>dispatchOnKeyEvent:with: Receiver: an OBTextMorphEditorWithShout Arguments and temporary variables: keyEvent: [keystroke '<Cmd-d>'] typeAheadStream: a WriteStream '' Receiver's instance variables: model: an OBDefinitionPanel paragraph: a MultiNewParagraph startBlock: a CharacterBlock with index 257 and character $" and rectangle 346....etc... stopBlock: a CharacterBlock with index 210 and character $S and rectangle 7.224...etc... beginTypeInBlock: nil emphasisHere: an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc... initialText: a Text for 'printDirectlyToDisplay "For debugging: write the rece...etc... selectionShowing: false otherInterval: (208 to: 207) lastParentLocation: nil morph: an OBTextMorphWithShout(3688) oldInterval: (210 to: 209) pivotBlock: a CharacterBlock with index 210 and character $S and rectangle 7.22...etc... inBackTo: nil
OBTextMorphEditorWithShout(ParagraphEditor)>>keystroke: Receiver: an OBTextMorphEditorWithShout Arguments and temporary variables: keyEvent: [keystroke '<Cmd-d>'] typeAhead: a WriteStream '' Receiver's instance variables: model: an OBDefinitionPanel paragraph: a MultiNewParagraph startBlock: a CharacterBlock with index 257 and character $" and rectangle 346....etc... stopBlock: a CharacterBlock with index 210 and character $S and rectangle 7.224...etc... beginTypeInBlock: nil emphasisHere: an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc... initialText: a Text for 'printDirectlyToDisplay "For debugging: write the rece...etc... selectionShowing: false otherInterval: (208 to: 207) lastParentLocation: nil morph: an OBTextMorphWithShout(3688) oldInterval: (210 to: 209) pivotBlock: a CharacterBlock with index 210 and character $S and rectangle 7.22...etc... inBackTo: nil
OBTextMorphEditorWithShout(TextMorphEditor)>>keystroke: Receiver: an OBTextMorphEditorWithShout Arguments and temporary variables: keyEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: model: an OBDefinitionPanel paragraph: a MultiNewParagraph startBlock: a CharacterBlock with index 257 and character $" and rectangle 346....etc... stopBlock: a CharacterBlock with index 210 and character $S and rectangle 7.224...etc... beginTypeInBlock: nil emphasisHere: an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc... initialText: a Text for 'printDirectlyToDisplay "For debugging: write the rece...etc... selectionShowing: false otherInterval: (208 to: 207) lastParentLocation: nil morph: an OBTextMorphWithShout(3688) oldInterval: (210 to: 209) pivotBlock: a CharacterBlock with index 210 and character $S and rectangle 7.22...etc... inBackTo: nil
[] in [] in OBTextMorphWithShout(TextMorph)>>keyStroke: Receiver: an OBTextMorphWithShout(3688) Arguments and temporary variables: <<error during printing> Receiver's instance variables: bounds: 0@0 corner: 734@114 owner: a TransformMorph(832) submorphs: #() fullBounds: 0@0 corner: 734@114 color: Color black extension: a MorphExtension (835) [other: (blinkStart -> 2050726)] borderWidth: 0 borderColor: Color black textStyle: a TextStyle DejaVu Sans Mono text: a Text for 'printDirectlyToDisplay "For debugging: write the receiver''s...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: an OBTextMorphEditorWithShout container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editHistory: nil editView: an OBPluggableTextMorphWithShout(441) acceptOnCR: false
OBTextMorphWithShout(TextMorph)>>handleInteraction: Receiver: an OBTextMorphWithShout(3688) Arguments and temporary variables: interactionBlock: [closure] in [] in OBTextMorphWithShout(TextMorph)>>keyStroke...etc... oldEditor: an OBTextMorphEditorWithShout oldParagraph: a MultiNewParagraph oldText: a Text for 'printDirectlyToDisplay "For debugging: write the receiver...etc... Receiver's instance variables: bounds: 0@0 corner: 734@114 owner: a TransformMorph(832) submorphs: #() fullBounds: 0@0 corner: 734@114 color: Color black extension: a MorphExtension (835) [other: (blinkStart -> 2050726)] borderWidth: 0 borderColor: Color black textStyle: a TextStyle DejaVu Sans Mono text: a Text for 'printDirectlyToDisplay "For debugging: write the receiver''s...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: an OBTextMorphEditorWithShout container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editHistory: nil editView: an OBPluggableTextMorphWithShout(441) acceptOnCR: false
OBTextMorphWithShout(TextMorphForEditView)>>handleInteraction: Receiver: an OBTextMorphWithShout(3688) Arguments and temporary variables: interActionBlock: [closure] in [] in OBTextMorphWithShout(TextMorph)>>keyStroke...etc... Receiver's instance variables: bounds: 0@0 corner: 734@114 owner: a TransformMorph(832) submorphs: #() fullBounds: 0@0 corner: 734@114 color: Color black extension: a MorphExtension (835) [other: (blinkStart -> 2050726)] borderWidth: 0 borderColor: Color black textStyle: a TextStyle DejaVu Sans Mono text: a Text for 'printDirectlyToDisplay "For debugging: write the receiver''s...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: an OBTextMorphEditorWithShout container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editHistory: nil editView: an OBPluggableTextMorphWithShout(441) acceptOnCR: false
[] in OBTextMorphWithShout(TextMorph)>>keyStroke: Receiver: an OBTextMorphWithShout(3688) Arguments and temporary variables: evt: [keystroke '<Cmd-d>'] action: nil Receiver's instance variables: bounds: 0@0 corner: 734@114 owner: a TransformMorph(832) submorphs: #() fullBounds: 0@0 corner: 734@114 color: Color black extension: a MorphExtension (835) [other: (blinkStart -> 2050726)] borderWidth: 0 borderColor: Color black textStyle: a TextStyle DejaVu Sans Mono text: a Text for 'printDirectlyToDisplay "For debugging: write the receiver''s...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: an OBTextMorphEditorWithShout container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editHistory: nil editView: an OBPluggableTextMorphWithShout(441) acceptOnCR: false
ECToolSet class>>codeCompletionAround:textMorph:keyStroke: Receiver: ECToolSet Arguments and temporary variables: aBlock: [closure] in OBTextMorphWithShout(TextMorph)>>keyStroke: aTextMorph: an OBTextMorphWithShout(3688) evt: [keystroke '<Cmd-d>'] completionAllowed: true editor: an OBTextMorphEditorWithShout stringHolder: an OBDefinitionPanel Receiver's instance variables: superclass: StandardToolSet methodDict: a MethodDictionary() format: 2 instanceVariables: nil organization: ('as yet unclassified')
subclasses: nil name: #ECToolSet classPool: nil sharedPools: nil environment: Smalltalk category: #'Ocompletion-ECSqueak' traitComposition: nil localSelectors: nil
DEVToolSet class>>codeCompletionAround:textMorph:keyStroke: Receiver: DEVToolSet Arguments and temporary variables: aBlock: [closure] in OBTextMorphWithShout(TextMorph)>>keyStroke: aTextMorph: an OBTextMorphWithShout(3688) evt: [keystroke '<Cmd-d>'] toolSet: ECToolSet Receiver's instance variables: superclass: StandardToolSet methodDict: a MethodDictionary() format: 2 instanceVariables: nil organization: ('as yet unclassified')
subclasses: nil name: #DEVToolSet classPool: nil sharedPools: nil environment: Smalltalk category: #ImageForDevelopers traitComposition: nil localSelectors: nil
ToolSet class>>codeCompletionAround:textMorph:keyStroke: Receiver: ToolSet Arguments and temporary variables: aBlock: [closure] in OBTextMorphWithShout(TextMorph)>>keyStroke: aTextMorph: an OBTextMorphWithShout(3688) evt: [keystroke '<Cmd-d>'] Receiver's instance variables: superclass: AppRegistry methodDict: a MethodDictionary() format: 2 instanceVariables: nil organization: ('as yet unclassified')
subclasses: nil name: #ToolSet classPool: nil sharedPools: nil environment: Smalltalk category: #'System-Applications' traitComposition: nil localSelectors: nil registeredClasses: an OrderedCollection(StandardToolSet NewInspectorToolSet DEV...etc... default: DEVToolSet
OBTextMorphWithShout(TextMorph)>>keyStroke: Receiver: an OBTextMorphWithShout(3688) Arguments and temporary variables: evt: [keystroke '<Cmd-d>'] Receiver's instance variables: bounds: 0@0 corner: 734@114 owner: a TransformMorph(832) submorphs: #() fullBounds: 0@0 corner: 734@114 color: Color black extension: a MorphExtension (835) [other: (blinkStart -> 2050726)] borderWidth: 0 borderColor: Color black textStyle: a TextStyle DejaVu Sans Mono text: a Text for 'printDirectlyToDisplay "For debugging: write the receiver''s...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: an OBTextMorphEditorWithShout container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editHistory: nil editView: an OBPluggableTextMorphWithShout(441) acceptOnCR: false
OBTextMorphWithShout(TextMorphForEditView)>>keyStroke: Receiver: an OBTextMorphWithShout(3688) Arguments and temporary variables: evt: [keystroke '<Cmd-d>'] view: an OBPluggableTextMorphWithShout(441) Receiver's instance variables: bounds: 0@0 corner: 734@114 owner: a TransformMorph(832) submorphs: #() fullBounds: 0@0 corner: 734@114 color: Color black extension: a MorphExtension (835) [other: (blinkStart -> 2050726)] borderWidth: 0 borderColor: Color black textStyle: a TextStyle DejaVu Sans Mono text: a Text for 'printDirectlyToDisplay "For debugging: write the receiver''s...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: an OBTextMorphEditorWithShout container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editHistory: nil editView: an OBPluggableTextMorphWithShout(441) acceptOnCR: false
OBTextMorphWithShout(TextMorph)>>handleKeystroke: Receiver: an OBTextMorphWithShout(3688) Arguments and temporary variables: anEvent: [keystroke '<Cmd-d>'] pasteUp: nil Receiver's instance variables: bounds: 0@0 corner: 734@114 owner: a TransformMorph(832) submorphs: #() fullBounds: 0@0 corner: 734@114 color: Color black extension: a MorphExtension (835) [other: (blinkStart -> 2050726)] borderWidth: 0 borderColor: Color black textStyle: a TextStyle DejaVu Sans Mono text: a Text for 'printDirectlyToDisplay "For debugging: write the receiver''s...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: an OBTextMorphEditorWithShout container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editHistory: nil editView: an OBPluggableTextMorphWithShout(441) acceptOnCR: false
KeyboardEvent>>sentTo: Receiver: [keystroke '<Cmd-d>'] Arguments and temporary variables: anObject: an OBTextMorphWithShout(3688) Receiver's instance variables: timeStamp: 1998226 source: a HandMorph(3216) windowIndex: nil type: #keystroke buttons: 64 position: 346@104 handler: nil wasHandled: true keyValue: 100 charCode: 100 scanCode: 2
OBTextMorphWithShout(Morph)>>handleEvent: Receiver: an OBTextMorphWithShout(3688) Arguments and temporary variables: anEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: bounds: 0@0 corner: 734@114 owner: a TransformMorph(832) submorphs: #() fullBounds: 0@0 corner: 734@114 color: Color black extension: a MorphExtension (835) [other: (blinkStart -> 2050726)] borderWidth: 0 borderColor: Color black textStyle: a TextStyle DejaVu Sans Mono text: a Text for 'printDirectlyToDisplay "For debugging: write the receiver''s...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: an OBTextMorphEditorWithShout container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editHistory: nil editView: an OBPluggableTextMorphWithShout(441) acceptOnCR: false
OBTextMorphWithShout(Morph)>>handleFocusEvent: Receiver: an OBTextMorphWithShout(3688) Arguments and temporary variables: anEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: bounds: 0@0 corner: 734@114 owner: a TransformMorph(832) submorphs: #() fullBounds: 0@0 corner: 734@114 color: Color black extension: a MorphExtension (835) [other: (blinkStart -> 2050726)] borderWidth: 0 borderColor: Color black textStyle: a TextStyle DejaVu Sans Mono text: a Text for 'printDirectlyToDisplay "For debugging: write the receiver''s...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: an OBTextMorphEditorWithShout container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editHistory: nil editView: an OBPluggableTextMorphWithShout(441) acceptOnCR: false
[] in HandMorph>>sendFocusEvent:to:clear: Receiver: a HandMorph(3216) Arguments and temporary variables: <<error during printing> Receiver's instance variables: bounds: 1138@524 corner: 1154@540 owner: a PasteUpMorph(1622) [world] submorphs: #() fullBounds: 1138@524 corner: 1154@540 color: Color blue extension: a MorphExtension (539) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: nil eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [1138@524 mouseUp 2090376 nil] targetOffset: 35@8 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: true temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 2090376 1138 524 0 0 0 1) lastKeyScanCode: 2 combinedChar: nil
[] in PasteUpMorph>>becomeActiveDuring: Receiver: a PasteUpMorph(1622) [world] Arguments and temporary variables: <<error during printing> Receiver's instance variables: bounds: 0@0 corner: 1424@848 owner: nil submorphs: an Array(a TaskbarMorph(3095) a SystemWindow(2431) a SystemWindow(40...etc... fullBounds: 0@0 corner: 1424@848 color: (Color r: 0.97 g: 0.98 b: 1.0) extension: a MorphExtension (2543) [eventHandler = an EventHandler] [other: (...etc... borderWidth: 0 borderColor: (Color r: 0.03 g: 0.02 b: 0.0) presenter: a Presenter (1246) model: a MorphicModel(1926) cursor: 1 padding: 3 backgroundMorph: nil isPartsBin: nil autoLineLayout: false indicateCursor: nil resizeToFit: nil wantsMouseOverHalos: nil worldState: a WorldState griddingOn: nil
BlockClosure>>on:do: Receiver: [closure] in PasteUpMorph>>becomeActiveDuring: Arguments and temporary variables: exception: Error handlerAction: [closure] in PasteUpMorph>>becomeActiveDuring: handlerActive: false Receiver's instance variables: outerContext: PasteUpMorph>>becomeActiveDuring: startpc: 67 numArgs: 0
--- The full stack --- DisplayText(Object)>>doesNotUnderstand: #form: PSUIManager(MorphicUIManager)>>composeFormFor: DisplayText>>composeForm DisplayText>>form DisplayText>>displayOn:at:clippingBox:rule:fillColor: DisplayText(DisplayObject)>>displayOn:at: ByteString(String)>>displayOn:at:textColor: ByteString(String)>>displayOn:at: ByteString(String)>>displayAt: StringMorph(Object)>>printDirectlyToDisplay Object class>>DoIt Compiler>>evaluate:in:to:notifying:ifFail:logged: [] in OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection BlockClosure>>on:do: OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection OBTextMorphEditorWithShout(ParagraphEditor)>>doIt [] in OBTextMorphEditorWithShout(ParagraphEditor)>>doIt: OBTextMorphEditorWithShout (ParagraphEditor)>>terminateAndInitializeAround: OBTextMorphEditorWithShout(ParagraphEditor)>>doIt: OBTextMorphEditorWithShout(ParagraphEditor)>>dispatchOnKeyEvent:with: OBTextMorphEditorWithShout(TextMorphEditor)>>dispatchOnKeyEvent:with: OBTextMorphEditorWithShout(ParagraphEditor)>>keystroke: OBTextMorphEditorWithShout(TextMorphEditor)>>keystroke: [] in [] in OBTextMorphWithShout(TextMorph)>>keyStroke: OBTextMorphWithShout(TextMorph)>>handleInteraction: OBTextMorphWithShout(TextMorphForEditView)>>handleInteraction: [] in OBTextMorphWithShout(TextMorph)>>keyStroke: ECToolSet class>>codeCompletionAround:textMorph:keyStroke: DEVToolSet class>>codeCompletionAround:textMorph:keyStroke: ToolSet class>>codeCompletionAround:textMorph:keyStroke: OBTextMorphWithShout(TextMorph)>>keyStroke: OBTextMorphWithShout(TextMorphForEditView)>>keyStroke: OBTextMorphWithShout(TextMorph)>>handleKeystroke: KeyboardEvent>>sentTo: OBTextMorphWithShout(Morph)>>handleEvent: OBTextMorphWithShout(Morph)>>handleFocusEvent: [] in HandMorph>>sendFocusEvent:to:clear: [] in PasteUpMorph>>becomeActiveDuring: BlockClosure>>on:do:
_______________________________________________ Pharo-project mailing list Pharo-project@lists.gforge.inria.fr http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project
_______________________________________________ Pharo-project mailing list Pharo-project@lists.gforge.inria.fr http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project
i think solution is to remove call of #form:. It looks redundant On Mon, Sep 14, 2009 at 22:42, Stéphane Ducasse <stephane.ducasse@inria.fr> wrote:
thanks.
On Sep 14, 2009, at 8:17 PM, Andrey Larionov wrote:
Yep. I notice about in this thread http://lists.gforge.inria.fr/pipermail/pharo-project/2009-September/013307.h...
On Mon, Sep 14, 2009 at 21:30, Stéphane Ducasse <stephane.ducasse@inria.fr> wrote:
VM: Mac OS - intel - 1058 - Squeak3.8.1 of '28 Aug 2006' [latest update: #6747] Squeak VM 4.2.1b1 Image: Pharo1.0beta [Latest update: #10440]
SecurityManager state: Restricted: false FileAccess: true SocketAccess: true Working Dir /Users/ducasse/Workspace/FirstCircle/ActiveResearch/ Pharo/ Pharo/pharo1.0-10440-BETAdev09.09.1 Trusted Dir /foobar/tooBar/forSqueak/bogus Untrusted Dir /Users/ducasse/Library/Preferences/Squeak/Internet/My Squeak
DisplayText(Object)>>doesNotUnderstand: #form:     Receiver: a DisplayText     Arguments and temporary variables:         aMessage:    form: Form(210x20x32)         exception:    MessageNotUnderstood: DisplayText>>form:         resumeValue:   nil     Receiver's instance variables:         text:  a Text for 'a StringMorph(133)''Preferences'''         textStyle:    a TextStyle DejaVu Sans         offset:     0@0         form:  nil         foreColor:    Color black         backColor:    Color white
PSUIManager(MorphicUIManager)>>composeFormFor:     Receiver: a PSUIManager     Arguments and temporary variables:         aDisplayText:  a DisplayText         canvas:     a FormCanvas on: Form(210x20x32)         tmpText:     a TextMorph(1819)     Receiver's instance variables:         interactiveParser:    nil
DisplayText>>composeForm     Receiver: a DisplayText     Arguments and temporary variables:
    Receiver's instance variables:         text:  a Text for 'a StringMorph(133)''Preferences'''         textStyle:    a TextStyle DejaVu Sans         offset:     0@0         form:  nil         foreColor:    Color black         backColor:    Color white
DisplayText>>form     Receiver: a DisplayText     Arguments and temporary variables:
    Receiver's instance variables:         text:  a Text for 'a StringMorph(133)''Preferences'''         textStyle:    a TextStyle DejaVu Sans         offset:     0@0         form:  nil         foreColor:    Color black         backColor:    Color white
DisplayText>>displayOn:at:clippingBox:rule:fillColor:     Receiver: a DisplayText     Arguments and temporary variables:         aDisplayMedium:     DisplayScreen(1424x848x32)         aDisplayPoint:  0@100         clipRectangle:  0@0 corner: 1424@848         ruleInteger:   3         aForm:  nil         form1:  nil         rule:  nil     Receiver's instance variables:         text:  a Text for 'a StringMorph(133)''Preferences'''         textStyle:    a TextStyle DejaVu Sans         offset:     0@0         form:  nil         foreColor:    Color black         backColor:    Color white
DisplayText(DisplayObject)>>displayOn:at:     Receiver: a DisplayText     Arguments and temporary variables:         aDisplayMedium:     DisplayScreen(1424x848x32)         aDisplayPoint:  0@100     Receiver's instance variables:         text:  a Text for 'a StringMorph(133)''Preferences'''         textStyle:    a TextStyle DejaVu Sans         offset:     0@0         form:  nil         foreColor:    Color black         backColor:    Color white
ByteString(String)>>displayOn:at:textColor:     Receiver: 'a StringMorph(133)''Preferences'''     Arguments and temporary variables:         aDisplayMedium:     DisplayScreen(1424x848x32)         aPoint:     0@100         aColor:     Color black     Receiver's instance variables: 'a StringMorph(133)''Preferences'''
ByteString(String)>>displayOn:at: Â Â Â Â Receiver: 'a StringMorph(133)''Preferences''' Â Â Â Â Arguments and temporary variables: Â Â Â Â Â Â Â Â aDisplayMedium: Â Â Â Â DisplayScreen(1424x848x32) Â Â Â Â Â Â Â Â aPoint: Â Â Â Â 0@100 Â Â Â Â Receiver's instance variables: 'a StringMorph(133)''Preferences'''
ByteString(String)>>displayAt: Â Â Â Â Receiver: 'a StringMorph(133)''Preferences''' Â Â Â Â Arguments and temporary variables: Â Â Â Â Â Â Â Â aPoint: Â Â Â Â 0@100 Â Â Â Â Receiver's instance variables: 'a StringMorph(133)''Preferences'''
StringMorph(Object)>>printDirectlyToDisplay     Receiver: a StringMorph(133)'Preferences'     Arguments and temporary variables:
    Receiver's instance variables:         bounds:     0@0 corner: 93@18         owner:  an AlignmentMorph(548)         submorphs:    #()         fullBounds:   nil         color:  Color black         extension:    nil         font:  a LogicalFont  familyName: DejaVu Serif  emphasis: nil  pointSize: 11  re...etc...         emphasis:    0         contents:    'Preferences'         hasFocus:    false
Object class>>DoIt     Receiver: Object     Arguments and temporary variables:
    Receiver's instance variables:         superclass:   ProtoObject         methodDict:   a MethodDictionary(size 378)         format:     2         instanceVariables:    nil         organization:  ('*Polymorph-EventEnhancements' when:send:to:exclusive: when:send...etc...         subclasses:   {BalloonState . StandardFileMenuResult . UndefinedObject . Boolean ...etc...         name:  #Object         classPool:    a Dictionary(#DependentsFields->a WeakIdentityKeyDictionary(size 154...etc...         sharedPools:   nil         environment:   Smalltalk         category:    #'Kernel-Objects'         traitComposition:    nil         localSelectors:     nil
Compiler>>evaluate:in:to:notifying:ifFail:logged:     Receiver: a Compiler     Arguments and temporary variables: <<error during printing>     Receiver's instance variables:         sourceStream:  a ReadWriteStream 'printDirectlyToDisplay     "For debugging: write ...etc...         requestor:    an OBTextMorphEditorWithShout         class:  Object class         category:    nil         context:     nil         parser:     a Parser
[] in OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection     Receiver: an OBTextMorphEditorWithShout     Arguments and temporary variables: <<error during printing>     Receiver's instance variables:         model:  an OBDefinitionPanel         paragraph:    a MultiNewParagraph         startBlock:   a CharacterBlock with index 257 and character $" and rectangle 346....etc...         stopBlock:    a CharacterBlock with index 210 and character $S and rectangle 7.224...etc...         beginTypeInBlock:    nil         emphasisHere:  an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc...         initialText:   a Text for 'printDirectlyToDisplay     "For debugging: write the rece...etc...         selectionShowing:    false         otherInterval:  (208 to: 207)         lastParentLocation:   nil         morph:  an OBTextMorphWithShout(3688)         oldInterval:   (210 to: 209)         pivotBlock:   a CharacterBlock with index 210 and character $S and rectangle 7.22...etc...         inBackTo:    nil
BlockClosure>>on:do:     Receiver: [closure] in OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection     Arguments and temporary variables:         exception:    OutOfScopeNotification         handlerAction:  [closure] in OBTextMorphEditorWithShout(ParagraphEditor)>>evalua...etc...         handlerActive:  true     Receiver's instance variables:         outerContext: OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection         startpc:     116         numArgs:     0
OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection     Receiver: an OBTextMorphEditorWithShout     Arguments and temporary variables:         result:     nil         rcvr:  Object         ctxt:  nil     Receiver's instance variables:         model:  an OBDefinitionPanel         paragraph:    a MultiNewParagraph         startBlock:   a CharacterBlock with index 257 and character $" and rectangle 346....etc...         stopBlock:    a CharacterBlock with index 210 and character $S and rectangle 7.224...etc...         beginTypeInBlock:    nil         emphasisHere:  an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc...         initialText:   a Text for 'printDirectlyToDisplay     "For debugging: write the rece...etc...         selectionShowing:    false         otherInterval:  (208 to: 207)         lastParentLocation:   nil         morph:  an OBTextMorphWithShout(3688)         oldInterval:   (210 to: 209)         pivotBlock:   a CharacterBlock with index 210 and character $S and rectangle 7.22...etc...         inBackTo:    nil
OBTextMorphEditorWithShout(ParagraphEditor)>>doIt     Receiver: an OBTextMorphEditorWithShout     Arguments and temporary variables:
    Receiver's instance variables:         model:  an OBDefinitionPanel         paragraph:    a MultiNewParagraph         startBlock:   a CharacterBlock with index 257 and character $" and rectangle 346....etc...         stopBlock:    a CharacterBlock with index 210 and character $S and rectangle 7.224...etc...         beginTypeInBlock:    nil         emphasisHere:  an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc...         initialText:   a Text for 'printDirectlyToDisplay     "For debugging: write the rece...etc...         selectionShowing:    false         otherInterval:  (208 to: 207)         lastParentLocation:   nil         morph:  an OBTextMorphWithShout(3688)         oldInterval:   (210 to: 209)         pivotBlock:   a CharacterBlock with index 210 and character $S and rectangle 7.22...etc...         inBackTo:    nil
[] in OBTextMorphEditorWithShout(ParagraphEditor)>>doIt:     Receiver: an OBTextMorphEditorWithShout     Arguments and temporary variables: <<error during printing>     Receiver's instance variables:         model:  an OBDefinitionPanel         paragraph:    a MultiNewParagraph         startBlock:   a CharacterBlock with index 257 and character $" and rectangle 346....etc...         stopBlock:    a CharacterBlock with index 210 and character $S and rectangle 7.224...etc...         beginTypeInBlock:    nil         emphasisHere:  an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc...         initialText:   a Text for 'printDirectlyToDisplay     "For debugging: write the rece...etc...         selectionShowing:    false         otherInterval:  (208 to: 207)         lastParentLocation:   nil         morph:  an OBTextMorphWithShout(3688)         oldInterval:   (210 to: 209)         pivotBlock:   a CharacterBlock with index 210 and character $S and rectangle 7.22...etc...         inBackTo:    nil
OBTextMorphEditorWithShout (ParagraphEditor)>>terminateAndInitializeAround:     Receiver: an OBTextMorphEditorWithShout     Arguments and temporary variables:         aBlock:     [closure] in OBTextMorphEditorWithShout(ParagraphEditor)>>doIt:     Receiver's instance variables:         model:  an OBDefinitionPanel         paragraph:    a MultiNewParagraph         startBlock:   a CharacterBlock with index 257 and character $" and rectangle 346....etc...         stopBlock:    a CharacterBlock with index 210 and character $S and rectangle 7.224...etc...         beginTypeInBlock:    nil         emphasisHere:  an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc...         initialText:   a Text for 'printDirectlyToDisplay     "For debugging: write the rece...etc...         selectionShowing:    false         otherInterval:  (208 to: 207)         lastParentLocation:   nil         morph:  an OBTextMorphWithShout(3688)         oldInterval:   (210 to: 209)         pivotBlock:   a CharacterBlock with index 210 and character $S and rectangle 7.22...etc...         inBackTo:    nil
OBTextMorphEditorWithShout(ParagraphEditor)>>doIt:     Receiver: an OBTextMorphEditorWithShout     Arguments and temporary variables:         characterStream:     a WriteStream ''     Receiver's instance variables:         model:  an OBDefinitionPanel         paragraph:    a MultiNewParagraph         startBlock:   a CharacterBlock with index 257 and character $" and rectangle 346....etc...         stopBlock:    a CharacterBlock with index 210 and character $S and rectangle 7.224...etc...         beginTypeInBlock:    nil         emphasisHere:  an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc...         initialText:   a Text for 'printDirectlyToDisplay     "For debugging: write the rece...etc...         selectionShowing:    false         otherInterval:  (208 to: 207)         lastParentLocation:   nil         morph:  an OBTextMorphWithShout(3688)         oldInterval:   (210 to: 209)         pivotBlock:   a CharacterBlock with index 210 and character $S and rectangle 7.22...etc...         inBackTo:    nil
OBTextMorphEditorWithShout(ParagraphEditor)>>dispatchOnKeyEvent:with:     Receiver: an OBTextMorphEditorWithShout     Arguments and temporary variables:         keyEvent:    [keystroke '<Cmd-d>']         typeAheadStream:     a WriteStream ''         honorCommandKeys:    true         keyValue:    100         keyChar:     $d         char:  $d         action:     #doIt:     Receiver's instance variables:         model:  an OBDefinitionPanel         paragraph:    a MultiNewParagraph         startBlock:   a CharacterBlock with index 257 and character $" and rectangle 346....etc...         stopBlock:    a CharacterBlock with index 210 and character $S and rectangle 7.224...etc...         beginTypeInBlock:    nil         emphasisHere:  an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc...         initialText:   a Text for 'printDirectlyToDisplay     "For debugging: write the rece...etc...         selectionShowing:    false         otherInterval:  (208 to: 207)         lastParentLocation:   nil         morph:  an OBTextMorphWithShout(3688)         oldInterval:   (210 to: 209)         pivotBlock:   a CharacterBlock with index 210 and character $S and rectangle 7.22...etc...         inBackTo:    nil
OBTextMorphEditorWithShout(TextMorphEditor)>>dispatchOnKeyEvent:with:     Receiver: an OBTextMorphEditorWithShout     Arguments and temporary variables:         keyEvent:    [keystroke '<Cmd-d>']         typeAheadStream:     a WriteStream ''     Receiver's instance variables:         model:  an OBDefinitionPanel         paragraph:    a MultiNewParagraph         startBlock:   a CharacterBlock with index 257 and character $" and rectangle 346....etc...         stopBlock:    a CharacterBlock with index 210 and character $S and rectangle 7.224...etc...         beginTypeInBlock:    nil         emphasisHere:  an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc...         initialText:   a Text for 'printDirectlyToDisplay     "For debugging: write the rece...etc...         selectionShowing:    false         otherInterval:  (208 to: 207)         lastParentLocation:   nil         morph:  an OBTextMorphWithShout(3688)         oldInterval:   (210 to: 209)         pivotBlock:   a CharacterBlock with index 210 and character $S and rectangle 7.22...etc...         inBackTo:    nil
OBTextMorphEditorWithShout(ParagraphEditor)>>keystroke:     Receiver: an OBTextMorphEditorWithShout     Arguments and temporary variables:         keyEvent:    [keystroke '<Cmd-d>']         typeAhead:    a WriteStream ''     Receiver's instance variables:         model:  an OBDefinitionPanel         paragraph:    a MultiNewParagraph         startBlock:   a CharacterBlock with index 257 and character $" and rectangle 346....etc...         stopBlock:    a CharacterBlock with index 210 and character $S and rectangle 7.224...etc...         beginTypeInBlock:    nil         emphasisHere:  an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc...         initialText:   a Text for 'printDirectlyToDisplay     "For debugging: write the rece...etc...         selectionShowing:    false         otherInterval:  (208 to: 207)         lastParentLocation:   nil         morph:  an OBTextMorphWithShout(3688)         oldInterval:   (210 to: 209)         pivotBlock:   a CharacterBlock with index 210 and character $S and rectangle 7.22...etc...         inBackTo:    nil
OBTextMorphEditorWithShout(TextMorphEditor)>>keystroke:     Receiver: an OBTextMorphEditorWithShout     Arguments and temporary variables:         keyEvent:    [keystroke '<Cmd-d>']     Receiver's instance variables:         model:  an OBDefinitionPanel         paragraph:    a MultiNewParagraph         startBlock:   a CharacterBlock with index 257 and character $" and rectangle 346....etc...         stopBlock:    a CharacterBlock with index 210 and character $S and rectangle 7.224...etc...         beginTypeInBlock:    nil         emphasisHere:  an Array(a TextColor code: (Color r: 0.0 g: 0.5 b: 0.0) a TextEmp...etc...         initialText:   a Text for 'printDirectlyToDisplay     "For debugging: write the rece...etc...         selectionShowing:    false         otherInterval:  (208 to: 207)         lastParentLocation:   nil         morph:  an OBTextMorphWithShout(3688)         oldInterval:   (210 to: 209)         pivotBlock:   a CharacterBlock with index 210 and character $S and rectangle 7.22...etc...         inBackTo:    nil
[] in [] in OBTextMorphWithShout(TextMorph)>>keyStroke:     Receiver: an OBTextMorphWithShout(3688)     Arguments and temporary variables: <<error during printing>     Receiver's instance variables:         bounds:     0@0 corner: 734@114         owner:  a TransformMorph(832)         submorphs:    #()         fullBounds:   0@0 corner: 734@114         color:  Color black         extension:    a MorphExtension (835) [other: (blinkStart -> 2050726)]         borderWidth:   0         borderColor:   Color black         textStyle:    a TextStyle DejaVu Sans Mono         text:  a Text for 'printDirectlyToDisplay     "For debugging: write the receiver''s...etc...         wrapFlag:    true         paragraph:    a MultiNewParagraph         editor:     an OBTextMorphEditorWithShout         container:    nil         predecessor:   nil         successor:    nil         backgroundColor:     nil         margins:     nil         editHistory:   nil         editView:    an OBPluggableTextMorphWithShout(441)         acceptOnCR:   false
OBTextMorphWithShout(TextMorph)>>handleInteraction:     Receiver: an OBTextMorphWithShout(3688)     Arguments and temporary variables:         interactionBlock:    [closure] in [] in OBTextMorphWithShout(TextMorph)>>keyStroke...etc...         oldEditor:    an OBTextMorphEditorWithShout         oldParagraph:  a MultiNewParagraph         oldText:     a Text for 'printDirectlyToDisplay     "For debugging: write the receiver...etc...     Receiver's instance variables:         bounds:     0@0 corner: 734@114         owner:  a TransformMorph(832)         submorphs:    #()         fullBounds:   0@0 corner: 734@114         color:  Color black         extension:    a MorphExtension (835) [other: (blinkStart -> 2050726)]         borderWidth:   0         borderColor:   Color black         textStyle:    a TextStyle DejaVu Sans Mono         text:  a Text for 'printDirectlyToDisplay     "For debugging: write the receiver''s...etc...         wrapFlag:    true         paragraph:    a MultiNewParagraph         editor:     an OBTextMorphEditorWithShout         container:    nil         predecessor:   nil         successor:    nil         backgroundColor:     nil         margins:     nil         editHistory:   nil         editView:    an OBPluggableTextMorphWithShout(441)         acceptOnCR:   false
OBTextMorphWithShout(TextMorphForEditView)>>handleInteraction:     Receiver: an OBTextMorphWithShout(3688)     Arguments and temporary variables:         interActionBlock:    [closure] in [] in OBTextMorphWithShout(TextMorph)>>keyStroke...etc...     Receiver's instance variables:         bounds:     0@0 corner: 734@114         owner:  a TransformMorph(832)         submorphs:    #()         fullBounds:   0@0 corner: 734@114         color:  Color black         extension:    a MorphExtension (835) [other: (blinkStart -> 2050726)]         borderWidth:   0         borderColor:   Color black         textStyle:    a TextStyle DejaVu Sans Mono         text:  a Text for 'printDirectlyToDisplay     "For debugging: write the receiver''s...etc...         wrapFlag:    true         paragraph:    a MultiNewParagraph         editor:     an OBTextMorphEditorWithShout         container:    nil         predecessor:   nil         successor:    nil         backgroundColor:     nil         margins:     nil         editHistory:   nil         editView:    an OBPluggableTextMorphWithShout(441)         acceptOnCR:   false
[] in OBTextMorphWithShout(TextMorph)>>keyStroke:     Receiver: an OBTextMorphWithShout(3688)     Arguments and temporary variables:         evt:   [keystroke '<Cmd-d>']         action:     nil     Receiver's instance variables:         bounds:     0@0 corner: 734@114         owner:  a TransformMorph(832)         submorphs:    #()         fullBounds:   0@0 corner: 734@114         color:  Color black         extension:    a MorphExtension (835) [other: (blinkStart -> 2050726)]         borderWidth:   0         borderColor:   Color black         textStyle:    a TextStyle DejaVu Sans Mono         text:  a Text for 'printDirectlyToDisplay     "For debugging: write the receiver''s...etc...         wrapFlag:    true         paragraph:    a MultiNewParagraph         editor:     an OBTextMorphEditorWithShout         container:    nil         predecessor:   nil         successor:    nil         backgroundColor:     nil         margins:     nil         editHistory:   nil         editView:    an OBPluggableTextMorphWithShout(441)         acceptOnCR:   false
ECToolSet class>>codeCompletionAround:textMorph:keyStroke:     Receiver: ECToolSet     Arguments and temporary variables:         aBlock:     [closure] in OBTextMorphWithShout(TextMorph)>>keyStroke:         aTextMorph:   an OBTextMorphWithShout(3688)         evt:   [keystroke '<Cmd-d>']         completionAllowed:    true         editor:     an OBTextMorphEditorWithShout         stringHolder:  an OBDefinitionPanel     Receiver's instance variables:         superclass:   StandardToolSet         methodDict:   a MethodDictionary()         format:     2         instanceVariables:    nil         organization:  ('as yet unclassified')
        subclasses:   nil         name:  #ECToolSet         classPool:    nil         sharedPools:   nil         environment:   Smalltalk         category:    #'Ocompletion-ECSqueak'         traitComposition:    nil         localSelectors:     nil
DEVToolSet class>>codeCompletionAround:textMorph:keyStroke:     Receiver: DEVToolSet     Arguments and temporary variables:         aBlock:     [closure] in OBTextMorphWithShout(TextMorph)>>keyStroke:         aTextMorph:   an OBTextMorphWithShout(3688)         evt:   [keystroke '<Cmd-d>']         toolSet:     ECToolSet     Receiver's instance variables:         superclass:   StandardToolSet         methodDict:   a MethodDictionary()         format:     2         instanceVariables:    nil         organization:  ('as yet unclassified')
        subclasses:   nil         name:  #DEVToolSet         classPool:    nil         sharedPools:   nil         environment:   Smalltalk         category:    #ImageForDevelopers         traitComposition:    nil         localSelectors:     nil
ToolSet class>>codeCompletionAround:textMorph:keyStroke:     Receiver: ToolSet     Arguments and temporary variables:         aBlock:     [closure] in OBTextMorphWithShout(TextMorph)>>keyStroke:         aTextMorph:   an OBTextMorphWithShout(3688)         evt:   [keystroke '<Cmd-d>']     Receiver's instance variables:         superclass:   AppRegistry         methodDict:   a MethodDictionary()         format:     2         instanceVariables:    nil         organization:  ('as yet unclassified')
        subclasses:   nil         name:  #ToolSet         classPool:    nil         sharedPools:   nil         environment:   Smalltalk         category:    #'System-Applications'         traitComposition:    nil         localSelectors:     nil         registeredClasses:    an OrderedCollection(StandardToolSet NewInspectorToolSet DEV...etc...         default:     DEVToolSet
OBTextMorphWithShout(TextMorph)>>keyStroke:     Receiver: an OBTextMorphWithShout(3688)     Arguments and temporary variables:         evt:   [keystroke '<Cmd-d>']     Receiver's instance variables:         bounds:     0@0 corner: 734@114         owner:  a TransformMorph(832)         submorphs:    #()         fullBounds:   0@0 corner: 734@114         color:  Color black         extension:    a MorphExtension (835) [other: (blinkStart -> 2050726)]         borderWidth:   0         borderColor:   Color black         textStyle:    a TextStyle DejaVu Sans Mono         text:  a Text for 'printDirectlyToDisplay     "For debugging: write the receiver''s...etc...         wrapFlag:    true         paragraph:    a MultiNewParagraph         editor:     an OBTextMorphEditorWithShout         container:    nil         predecessor:   nil         successor:    nil         backgroundColor:     nil         margins:     nil         editHistory:   nil         editView:    an OBPluggableTextMorphWithShout(441)         acceptOnCR:   false
OBTextMorphWithShout(TextMorphForEditView)>>keyStroke:     Receiver: an OBTextMorphWithShout(3688)     Arguments and temporary variables:         evt:   [keystroke '<Cmd-d>']         view:  an OBPluggableTextMorphWithShout(441)     Receiver's instance variables:         bounds:     0@0 corner: 734@114         owner:  a TransformMorph(832)         submorphs:    #()         fullBounds:   0@0 corner: 734@114         color:  Color black         extension:    a MorphExtension (835) [other: (blinkStart -> 2050726)]         borderWidth:   0         borderColor:   Color black         textStyle:    a TextStyle DejaVu Sans Mono         text:  a Text for 'printDirectlyToDisplay     "For debugging: write the receiver''s...etc...         wrapFlag:    true         paragraph:    a MultiNewParagraph         editor:     an OBTextMorphEditorWithShout         container:    nil         predecessor:   nil         successor:    nil         backgroundColor:     nil         margins:     nil         editHistory:   nil         editView:    an OBPluggableTextMorphWithShout(441)         acceptOnCR:   false
OBTextMorphWithShout(TextMorph)>>handleKeystroke:     Receiver: an OBTextMorphWithShout(3688)     Arguments and temporary variables:         anEvent:     [keystroke '<Cmd-d>']         pasteUp:     nil     Receiver's instance variables:         bounds:     0@0 corner: 734@114         owner:  a TransformMorph(832)         submorphs:    #()         fullBounds:   0@0 corner: 734@114         color:  Color black         extension:    a MorphExtension (835) [other: (blinkStart -> 2050726)]         borderWidth:   0         borderColor:   Color black         textStyle:    a TextStyle DejaVu Sans Mono         text:  a Text for 'printDirectlyToDisplay     "For debugging: write the receiver''s...etc...         wrapFlag:    true         paragraph:    a MultiNewParagraph         editor:     an OBTextMorphEditorWithShout         container:    nil         predecessor:   nil         successor:    nil         backgroundColor:     nil         margins:     nil         editHistory:   nil         editView:    an OBPluggableTextMorphWithShout(441)         acceptOnCR:   false
KeyboardEvent>>sentTo:     Receiver: [keystroke '<Cmd-d>']     Arguments and temporary variables:         anObject:    an OBTextMorphWithShout(3688)     Receiver's instance variables:         timeStamp:    1998226         source:     a HandMorph(3216)         windowIndex:   nil         type:  #keystroke         buttons:     64         position:    346@104         handler:     nil         wasHandled:   true         keyValue:    100         charCode:    100         scanCode:    2
OBTextMorphWithShout(Morph)>>handleEvent:     Receiver: an OBTextMorphWithShout(3688)     Arguments and temporary variables:         anEvent:     [keystroke '<Cmd-d>']     Receiver's instance variables:         bounds:     0@0 corner: 734@114         owner:  a TransformMorph(832)         submorphs:    #()         fullBounds:   0@0 corner: 734@114         color:  Color black         extension:    a MorphExtension (835) [other: (blinkStart -> 2050726)]         borderWidth:   0         borderColor:   Color black         textStyle:    a TextStyle DejaVu Sans Mono         text:  a Text for 'printDirectlyToDisplay     "For debugging: write the receiver''s...etc...         wrapFlag:    true         paragraph:    a MultiNewParagraph         editor:     an OBTextMorphEditorWithShout         container:    nil         predecessor:   nil         successor:    nil         backgroundColor:     nil         margins:     nil         editHistory:   nil         editView:    an OBPluggableTextMorphWithShout(441)         acceptOnCR:   false
OBTextMorphWithShout(Morph)>>handleFocusEvent:     Receiver: an OBTextMorphWithShout(3688)     Arguments and temporary variables:         anEvent:     [keystroke '<Cmd-d>']     Receiver's instance variables:         bounds:     0@0 corner: 734@114         owner:  a TransformMorph(832)         submorphs:    #()         fullBounds:   0@0 corner: 734@114         color:  Color black         extension:    a MorphExtension (835) [other: (blinkStart -> 2050726)]         borderWidth:   0         borderColor:   Color black         textStyle:    a TextStyle DejaVu Sans Mono         text:  a Text for 'printDirectlyToDisplay     "For debugging: write the receiver''s...etc...         wrapFlag:    true         paragraph:    a MultiNewParagraph         editor:     an OBTextMorphEditorWithShout         container:    nil         predecessor:   nil         successor:    nil         backgroundColor:     nil         margins:     nil         editHistory:   nil         editView:    an OBPluggableTextMorphWithShout(441)         acceptOnCR:   false
[] in HandMorph>>sendFocusEvent:to:clear:     Receiver: a HandMorph(3216)     Arguments and temporary variables: <<error during printing>     Receiver's instance variables:         bounds:     1138@524 corner: 1154@540         owner:  a PasteUpMorph(1622) [world]         submorphs:    #()         fullBounds:   1138@524 corner: 1154@540         color:  Color blue         extension:    a MorphExtension (539) [eventHandler = an EventHandler]         mouseFocus:   nil         keyboardFocus:  nil         eventListeners:     nil         mouseListeners:     nil         keyboardListeners:    nil         mouseClickState:     nil         mouseOverHandler:    a MouseOverHandler         lastMouseEvent:     [1138@524 mouseUp 2090376 nil]         targetOffset:  35@8         damageRecorder:     a DamageRecorder         cacheCanvas:   nil         cachedCanvasHasHoles:  true         temporaryCursor:     nil         temporaryCursorOffset:  nil         hardwareCursor:     nil         hasChanged:   true         savedPatch:   nil         userInitials:  ''         lastEventBuffer:     #(1 2090376 1138 524 0 0 0 1)         lastKeyScanCode:     2         combinedChar:  nil
[] in PasteUpMorph>>becomeActiveDuring:     Receiver: a PasteUpMorph(1622) [world]     Arguments and temporary variables: <<error during printing>     Receiver's instance variables:         bounds:     0@0 corner: 1424@848         owner:  nil         submorphs:    an Array(a TaskbarMorph(3095) a SystemWindow(2431) a SystemWindow(40...etc...         fullBounds:   0@0 corner: 1424@848         color:  (Color r: 0.97 g: 0.98 b: 1.0)         extension:    a MorphExtension (2543) [eventHandler = an EventHandler]  [other:  (...etc...         borderWidth:   0         borderColor:   (Color r: 0.03 g: 0.02 b: 0.0)         presenter:    a Presenter (1246)         model:  a MorphicModel(1926)         cursor:     1         padding:     3         backgroundMorph:     nil         isPartsBin:   nil         autoLineLayout:     false         indicateCursor:     nil         resizeToFit:   nil         wantsMouseOverHalos:   nil         worldState:   a WorldState         griddingOn:   nil
BlockClosure>>on:do:     Receiver: [closure] in PasteUpMorph>>becomeActiveDuring:     Arguments and temporary variables:         exception:    Error         handlerAction:  [closure] in PasteUpMorph>>becomeActiveDuring:         handlerActive:  false     Receiver's instance variables:         outerContext:  PasteUpMorph>>becomeActiveDuring:         startpc:     67         numArgs:     0
--- The full stack --- DisplayText(Object)>>doesNotUnderstand: #form: PSUIManager(MorphicUIManager)>>composeFormFor: DisplayText>>composeForm DisplayText>>form DisplayText>>displayOn:at:clippingBox:rule:fillColor: DisplayText(DisplayObject)>>displayOn:at: ByteString(String)>>displayOn:at:textColor: ByteString(String)>>displayOn:at: ByteString(String)>>displayAt: StringMorph(Object)>>printDirectlyToDisplay Object class>>DoIt Compiler>>evaluate:in:to:notifying:ifFail:logged: [] in OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection BlockClosure>>on:do: OBTextMorphEditorWithShout(ParagraphEditor)>>evaluateSelection OBTextMorphEditorWithShout(ParagraphEditor)>>doIt [] in OBTextMorphEditorWithShout(ParagraphEditor)>>doIt: OBTextMorphEditorWithShout (ParagraphEditor)>>terminateAndInitializeAround: OBTextMorphEditorWithShout(ParagraphEditor)>>doIt: OBTextMorphEditorWithShout(ParagraphEditor)>>dispatchOnKeyEvent:with: OBTextMorphEditorWithShout(TextMorphEditor)>>dispatchOnKeyEvent:with: OBTextMorphEditorWithShout(ParagraphEditor)>>keystroke: OBTextMorphEditorWithShout(TextMorphEditor)>>keystroke: [] in [] in OBTextMorphWithShout(TextMorph)>>keyStroke: OBTextMorphWithShout(TextMorph)>>handleInteraction: OBTextMorphWithShout(TextMorphForEditView)>>handleInteraction: [] in OBTextMorphWithShout(TextMorph)>>keyStroke: ECToolSet class>>codeCompletionAround:textMorph:keyStroke: DEVToolSet class>>codeCompletionAround:textMorph:keyStroke: ToolSet class>>codeCompletionAround:textMorph:keyStroke: OBTextMorphWithShout(TextMorph)>>keyStroke: OBTextMorphWithShout(TextMorphForEditView)>>keyStroke: OBTextMorphWithShout(TextMorph)>>handleKeystroke: KeyboardEvent>>sentTo: OBTextMorphWithShout(Morph)>>handleEvent: OBTextMorphWithShout(Morph)>>handleFocusEvent: [] in HandMorph>>sendFocusEvent:to:clear: [] in PasteUpMorph>>becomeActiveDuring: BlockClosure>>on:do:
_______________________________________________ Pharo-project mailing list Pharo-project@lists.gforge.inria.fr http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project
_______________________________________________ Pharo-project mailing list Pharo-project@lists.gforge.inria.fr http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project
_______________________________________________ Pharo-project mailing list Pharo-project@lists.gforge.inria.fr http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project
participants (2)
-
Andrey Larionov -
Stéphane Ducasse