Status: Accepted
Owner: [hidden email] Labels: Milestone-1.4 New issue 5185 by [hidden email]: DoIt not found in methodDict http://code.google.com/p/pharo/issues/detail?id=5185 evaluating a deprecation 1 deprecated: 'asda' on: 'asd' in: 'asdasd'. brings a debugger with the following: 16 January 2012 2:18:47 pm VM: unix - i686 - linux-gnu - CoInterpreter VMMaker-oscog-IgorStasenko.108 uuid: 384f4108-f1f4-4954-8357-0b3005cb81e2 Jul 22 2011, StackToRegisterMappingCogit VMMaker-oscog-IgorStasenko.108 uuid: 384f4108-f1f4-4954-8357-0b3005cb81e2 Jul 22 2011, https://git.gitorious.org/cogvm/blessed.git Commit: fde60cf1a440cd0ba4c56470dffff4aafc664d88 Date: Fri Jul 22 14:16:11 2011 +0200 By: Igor Stasenko <[hidden email]> Image: Pharo1.4a [Latest update: #14283] MethodDictionary(Dictionary)>>errorKeyNotFound: Receiver: a MethodDictionary(#addDependent:->(UndefinedObject>>#addDependent: "a CompiledMethod(3360...etc... Arguments and temporary variables: aKey: #DoIt Receiver's instance variables: tally: 45 array: {nil. nil. nil. (UndefinedObject>>#removeSubclass: "a CompiledMethod(537...etc... [self errorKeyNotFound: key] in MethodDictionary(Dictionary)>>at: Receiver: a MethodDictionary(#addDependent:->(UndefinedObject>>#addDependent: "a CompiledMethod(3360...etc... Arguments and temporary variables: key: #DoIt Receiver's instance variables: tally: 45 array: {nil. nil. nil. (UndefinedObject>>#removeSubclass: "a CompiledMethod(537...etc... MethodDictionary>>at:ifAbsent: Receiver: a MethodDictionary(#addDependent:->(UndefinedObject>>#addDependent: "a CompiledMethod(3360...etc... Arguments and temporary variables: key: #DoIt aBlock: [self errorKeyNotFound: key] index: 46 Receiver's instance variables: tally: 45 array: {nil. nil. nil. (UndefinedObject>>#removeSubclass: "a CompiledMethod(537...etc... MethodDictionary(Dictionary)>>at: Receiver: a MethodDictionary(#addDependent:->(UndefinedObject>>#addDependent: "a CompiledMethod(3360...etc... Arguments and temporary variables: key: #DoIt Receiver's instance variables: tally: 45 array: {nil. nil. nil. (UndefinedObject>>#removeSubclass: "a CompiledMethod(537...etc... UndefinedObject class(Behavior)>>compiledMethodAt: Receiver: UndefinedObject Arguments and temporary variables: selector: #DoIt Receiver's instance variables: superclass: Object methodDict: a MethodDictionary(#addDependent:->(UndefinedObject>>#addDependent:...etc... format: 2 instanceVariables: nil organization: ('*Compiler-Kernel' parserClass) ('bottom context' canHandleSigna...etc... subclasses: nil name: #UndefinedObject classPool: a Dictionary() sharedPools: nil environment: nil category: #'Kernel-Objects' traitComposition: nil localSelectors: nil UndefinedObject class(Behavior)>>>> Receiver: UndefinedObject Arguments and temporary variables: selector: #DoIt Receiver's instance variables: superclass: Object methodDict: a MethodDictionary(#addDependent:->(UndefinedObject>>#addDependent:...etc... format: 2 instanceVariables: nil organization: ('*Compiler-Kernel' parserClass) ('bottom context' canHandleSigna...etc... subclasses: nil name: #UndefinedObject classPool: a Dictionary() sharedPools: nil environment: nil category: #'Kernel-Objects' traitComposition: nil localSelectors: nil RGMethodDefinition class>>realClass:selector: Receiver: RGMethodDefinition Arguments and temporary variables: aClass: UndefinedObject aString: #DoIt Receiver's instance variables: superclass: RGElementDefinition methodDict: a MethodDictionary(#'<='->(RGMethodDefinition>>#'<=' "a CompiledMet...etc... format: 146 instanceVariables: #('protocol' 'sourceCode' 'stamp' 'package') organization: ('accessing' compiledMethod fullName isExtension isExtension: pac...etc... subclasses: nil name: #RGMethodDefinition classPool: nil sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'Ring-Core-Kernel' traitComposition: {} localSelectors: nil CompiledMethod>>methodReference Receiver: (UndefinedObject>>#DoIt "a CompiledMethod(729546752)") Arguments and temporary variables: class: UndefinedObject selector: #DoIt Receiver's instance variables: (UndefinedObject>>#DoIt "a CompiledMethod(729546752)") Deprecation>>method:explanation:on:in: Receiver: <<error during printing>> Arguments and temporary variables: aCompiledMethod: (UndefinedObject>>#DoIt "a CompiledMethod(729546752)") anExplanationString: 'asda' dateString: 'asd' aVersionString: 'asdasd' Receiver's instance variables: messageText: nil tag: nil signaler: nil signalContext: nil handlerContext: nil outerContext: nil methodReference: nil explanationString: nil deprecationDate: nil versionString: nil Deprecation class>>method:explanation:on:in: Receiver: Deprecation Arguments and temporary variables: aCompiledMethod: (UndefinedObject>>#DoIt "a CompiledMethod(729546752)") anExplanationString: 'asda' dateString: 'asd' aVersionString: 'asdasd' Receiver's instance variables: superclass: Warning methodDict: a MethodDictionary(#=->(Deprecation>>#= "a CompiledMethod(254803968...etc... format: 150 instanceVariables: #('methodReference' 'explanationString' 'deprecationDate' 'v...etc... organization: ('accessing' deprecationDate explanationString messageText method...etc... subclasses: nil name: #Deprecation classPool: a Dictionary(#Log->nil #RaiseWarning->true #ShowWarning->true ) sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'Kernel-Exceptions' traitComposition: nil localSelectors: nil SmallInteger(Object)>>deprecated:on:in: Receiver: 1 Arguments and temporary variables: anExplanationString: 'asda' date: 'asd' version: 'asdasd' Receiver's instance variables: 1 UndefinedObject>>DoIt Receiver: nil Arguments and temporary variables: Receiver's instance variables: nil Compiler>>evaluate:in:to:notifying:ifFail:logged: Receiver: a Compiler Arguments and temporary variables: textOrStream: a ReadWriteStream aContext: nil receiver: nil aRequestor: a TextMorphForEditView(375390208) failBlock: [self morph flash. ^ nil] logFlag: true methodNode: DoIt ^ 1 deprecated: 'asda' on: 'asd' in: 'asdasd' method: (UndefinedObject>>#DoIt "a CompiledMethod(729546752)") value: nil toLog: nil itsSelection: nil itsSelectionString: nil Receiver's instance variables: sourceStream: a ReadWriteStream requestor: a TextMorphForEditView(375390208) class: UndefinedObject category: nil context: nil parser: a Parser [rcvr class evaluatorClass new evaluate: self selectionForDoitAsStream in: ctxt to: rcvr notifying: self morph ifFail: [self morph flash. ^ nil] logged: true] in SmalltalkEditor>>evaluateSelectionAndDo: Receiver: a SmalltalkEditor Arguments and temporary variables: rcvr: nil ctxt: nil Receiver's instance variables: morph: a TextMorphForEditView(375390208) selectionShowing: true model: a Workspace editingState: a SmalltalkEditingState BlockClosure>>on:do: Receiver: [rcvr class evaluatorClass new evaluate: self selectionForDoitAsStream in: ctxt to: ...etc... Arguments and temporary variables: exception: OutOfScopeNotification handlerAction: [:ex | ex resume: true] handlerActive: true Receiver's instance variables: outerContext: SmalltalkEditor>>evaluateSelectionAndDo: startpc: 110 numArgs: 0 SmalltalkEditor>>evaluateSelectionAndDo: Receiver: a SmalltalkEditor Arguments and temporary variables: aBlock: [:result | result] result: nil rcvr: nil ctxt: nil Receiver's instance variables: morph: a TextMorphForEditView(375390208) selectionShowing: true model: a Workspace editingState: a SmalltalkEditingState SmalltalkEditor>>evaluateSelection Receiver: a SmalltalkEditor Arguments and temporary variables: Receiver's instance variables: morph: a TextMorphForEditView(375390208) selectionShowing: true model: a Workspace editingState: a SmalltalkEditingState SmalltalkEditor>>doIt Receiver: a SmalltalkEditor Arguments and temporary variables: Receiver's instance variables: morph: a TextMorphForEditView(375390208) selectionShowing: true model: a Workspace editingState: a SmalltalkEditingState SmalltalkEditor>>doIt: Receiver: a SmalltalkEditor Arguments and temporary variables: aKeyboardEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: morph: a TextMorphForEditView(375390208) selectionShowing: true model: a Workspace editingState: a SmalltalkEditingState SmalltalkEditor(TextEditor)>>performCmdActionsWith:shifted:return: Receiver: a SmalltalkEditor Arguments and temporary variables: aKeyboardEvent: [keystroke '<Cmd-d>'] aBoolean: false return: [:val | ^ val] asciiValue: 101 actions: #(#noop: #cursorHome: #noop: #noop: #cursorEnd: #noop: #noop: #noop: #...etc... action: #doIt: Receiver's instance variables: morph: a TextMorphForEditView(375390208) selectionShowing: true model: a Workspace editingState: a SmalltalkEditingState SmalltalkEditor(TextEditor)>>dispatchCommandOn:return: Receiver: a SmalltalkEditor Arguments and temporary variables: aKeyboardEvent: [keystroke '<Cmd-d>'] return: [:val | ^ val] asciiValue: 100 honorCommandKeys: true char: nil Receiver's instance variables: morph: a TextMorphForEditView(375390208) selectionShowing: true model: a Workspace editingState: a SmalltalkEditingState SmalltalkEditor(TextEditor)>>dispatchOn: Receiver: a SmalltalkEditor Arguments and temporary variables: aKeyboardEvent: [keystroke '<Cmd-d>'] char: nil return: [:val | ^ val] keyEvents: nil Receiver's instance variables: morph: a TextMorphForEditView(375390208) selectionShowing: true model: a Workspace editingState: a SmalltalkEditingState [self dispatchOn: aKeyboardEvent] in SmalltalkEditor(TextEditor)>>keystroke: Receiver: a SmalltalkEditor Arguments and temporary variables: aKeyboardEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: morph: a TextMorphForEditView(375390208) selectionShowing: true model: a Workspace editingState: a SmalltalkEditingState SmalltalkEditor(TextEditor)>>handleKeystrokeAction: Receiver: a SmalltalkEditor Arguments and temporary variables: aBlock: [self dispatchOn: aKeyboardEvent] Receiver's instance variables: morph: a TextMorphForEditView(375390208) selectionShowing: true model: a Workspace editingState: a SmalltalkEditingState SmalltalkEditor(TextEditor)>>handleEditionAction:fromKeyboardEvent: Receiver: a SmalltalkEditor Arguments and temporary variables: anAction: [self dispatchOn: aKeyboardEvent] aKeyboardEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: morph: a TextMorphForEditView(375390208) selectionShowing: true model: a Workspace editingState: a SmalltalkEditingState SmalltalkEditor(TextEditor)>>keystroke: Receiver: a SmalltalkEditor Arguments and temporary variables: aKeyboardEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: morph: a TextMorphForEditView(375390208) selectionShowing: true model: a Workspace editingState: a SmalltalkEditingState [editor keystroke: evt] in [| action | evt keyValue = 13 ifTrue: [action := self crAction. action ifNotNil: [evt hand newKeyboardFocus: nil. ^ action value]]. self handleInteraction: [editor keystroke: evt]. self updateFromParagraph. super keyStroke: evt] in TextMorphForEditView(TextMorph)>>keyStroke: Receiver: a TextMorphForEditView(375390208) Arguments and temporary variables: evt: [keystroke '<Cmd-d>'] Receiver's instance variables: bounds: (0@0) corner: (432@114) owner: a TransformMorph(199753728) submorphs: #() fullBounds: (0@0) corner: (432@114) color: Color black extension: a MorphExtension (395313152) [other: (blinkStart -> 1543220) (myDep...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for 'Browser open. #fullDrawOn:. ''**'' asRegex. 1 deprecated: ...etc... wrapFlag: true paragraph: a Paragraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableTextMorph(656408576) acceptOnCR: false autoAccept: false acceptOnFocusChange: false selectionColor: nil TextMorphForEditView(TextMorph)>>handleInteraction: Receiver: a TextMorphForEditView(375390208) Arguments and temporary variables: interactionBlock: [editor keystroke: evt] oldEditor: a SmalltalkEditor oldParagraph: a Paragraph oldText: a Text for 'Browser open. #fullDrawOn:. ''**'' asRegex. 1 deprecate...etc... Receiver's instance variables: bounds: (0@0) corner: (432@114) owner: a TransformMorph(199753728) submorphs: #() fullBounds: (0@0) corner: (432@114) color: Color black extension: a MorphExtension (395313152) [other: (blinkStart -> 1543220) (myDep...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for 'Browser open. #fullDrawOn:. ''**'' asRegex. 1 deprecated: ...etc... wrapFlag: true paragraph: a Paragraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableTextMorph(656408576) acceptOnCR: false autoAccept: false acceptOnFocusChange: false selectionColor: nil TextMorphForEditView>>handleInteraction: Receiver: a TextMorphForEditView(375390208) Arguments and temporary variables: interActionBlock: [editor keystroke: evt] Receiver's instance variables: bounds: (0@0) corner: (432@114) owner: a TransformMorph(199753728) submorphs: #() fullBounds: (0@0) corner: (432@114) color: Color black extension: a MorphExtension (395313152) [other: (blinkStart -> 1543220) (myDep...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for 'Browser open. #fullDrawOn:. ''**'' asRegex. 1 deprecated: ...etc... wrapFlag: true paragraph: a Paragraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableTextMorph(656408576) acceptOnCR: false autoAccept: false acceptOnFocusChange: false selectionColor: nil [| action | evt keyValue = 13 ifTrue: [action := self crAction. action ifNotNil: [evt hand newKeyboardFocus: nil. ^ action value]]. self handleInteraction: [editor keystroke: evt]. self updateFromParagraph. super keyStroke: evt] in TextMorphForEditView(TextMorph)>>keyStroke: Receiver: a TextMorphForEditView(375390208) Arguments and temporary variables: evt: [keystroke '<Cmd-d>'] action: nil Receiver's instance variables: bounds: (0@0) corner: (432@114) owner: a TransformMorph(199753728) submorphs: #() fullBounds: (0@0) corner: (432@114) color: Color black extension: a MorphExtension (395313152) [other: (blinkStart -> 1543220) (myDep...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for 'Browser open. #fullDrawOn:. ''**'' asRegex. 1 deprecated: ...etc... wrapFlag: true paragraph: a Paragraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableTextMorph(656408576) acceptOnCR: false autoAccept: false acceptOnFocusChange: false selectionColor: nil ToolRegistry>>codeCompletionAround:textMorph:keyStroke: Receiver: a ToolRegistry Arguments and temporary variables: aBlock: [| action | evt keyValue = 13 ifTrue: [action := self crAction. ac...etc... aTextMorph: a TextMorphForEditView(375390208) evt: [keystroke '<Cmd-d>'] Receiver's instance variables: tools: an IdentityDictionary(#basicInspector->BasicInspector #browser->[self de...etc... inspectorsMap: an IdentityDictionary(#CompiledMethod->#CompiledMethodInspector ...etc... SmalltalkEditor>>codeCompletionAround:textMorph:keyStroke: Receiver: a SmalltalkEditor Arguments and temporary variables: aBlock: [| action | evt keyValue = 13 ifTrue: [action := self crAction. ac...etc... aTextMorph: a TextMorphForEditView(375390208) anEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: morph: a TextMorphForEditView(375390208) selectionShowing: true model: a Workspace editingState: a SmalltalkEditingState TextMorphForEditView(TextMorph)>>keyStroke: Receiver: a TextMorphForEditView(375390208) Arguments and temporary variables: evt: [keystroke '<Cmd-d>'] Receiver's instance variables: bounds: (0@0) corner: (432@114) owner: a TransformMorph(199753728) submorphs: #() fullBounds: (0@0) corner: (432@114) color: Color black extension: a MorphExtension (395313152) [other: (blinkStart -> 1543220) (myDep...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for 'Browser open. #fullDrawOn:. ''**'' asRegex. 1 deprecated: ...etc... wrapFlag: true paragraph: a Paragraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableTextMorph(656408576) acceptOnCR: false autoAccept: false acceptOnFocusChange: false selectionColor: nil TextMorphForEditView>>keyStroke: Receiver: a TextMorphForEditView(375390208) Arguments and temporary variables: evt: [keystroke '<Cmd-d>'] view: a PluggableTextMorph(656408576) Receiver's instance variables: bounds: (0@0) corner: (432@114) owner: a TransformMorph(199753728) submorphs: #() fullBounds: (0@0) corner: (432@114) color: Color black extension: a MorphExtension (395313152) [other: (blinkStart -> 1543220) (myDep...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for 'Browser open. #fullDrawOn:. ''**'' asRegex. 1 deprecated: ...etc... wrapFlag: true paragraph: a Paragraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableTextMorph(656408576) acceptOnCR: false autoAccept: false acceptOnFocusChange: false selectionColor: nil TextMorphForEditView(TextMorph)>>handleKeystroke: Receiver: a TextMorphForEditView(375390208) Arguments and temporary variables: anEvent: [keystroke '<Cmd-d>'] pasteUp: nil Receiver's instance variables: bounds: (0@0) corner: (432@114) owner: a TransformMorph(199753728) submorphs: #() fullBounds: (0@0) corner: (432@114) color: Color black extension: a MorphExtension (395313152) [other: (blinkStart -> 1543220) (myDep...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for 'Browser open. #fullDrawOn:. ''**'' asRegex. 1 deprecated: ...etc... wrapFlag: true paragraph: a Paragraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableTextMorph(656408576) acceptOnCR: false autoAccept: false acceptOnFocusChange: false selectionColor: nil KeyboardEvent>>sentTo: Receiver: [keystroke '<Cmd-d>'] Arguments and temporary variables: anObject: a TextMorphForEditView(375390208) Receiver's instance variables: timeStamp: 1538202 source: a HandMorph(843055104) windowIndex: nil type: #keystroke buttons: 64 position: (270@94.0) handler: nil wasHandled: true keyValue: 100 charCode: 100 scanCode: 100 TextMorphForEditView(Morph)>>handleEvent: Receiver: a TextMorphForEditView(375390208) Arguments and temporary variables: anEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: bounds: (0@0) corner: (432@114) owner: a TransformMorph(199753728) submorphs: #() fullBounds: (0@0) corner: (432@114) color: Color black extension: a MorphExtension (395313152) [other: (blinkStart -> 1543220) (myDep...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for 'Browser open. #fullDrawOn:. ''**'' asRegex. 1 deprecated: ...etc... wrapFlag: true paragraph: a Paragraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableTextMorph(656408576) acceptOnCR: false autoAccept: false acceptOnFocusChange: false selectionColor: nil TextMorphForEditView(Morph)>>handleFocusEvent: Receiver: a TextMorphForEditView(375390208) Arguments and temporary variables: anEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: bounds: (0@0) corner: (432@114) owner: a TransformMorph(199753728) submorphs: #() fullBounds: (0@0) corner: (432@114) color: Color black extension: a MorphExtension (395313152) [other: (blinkStart -> 1543220) (myDep...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for 'Browser open. #fullDrawOn:. ''**'' asRegex. 1 deprecated: ...etc... wrapFlag: true paragraph: a Paragraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableTextMorph(656408576) acceptOnCR: false autoAccept: false acceptOnFocusChange: false selectionColor: nil [ActiveHand := self. ActiveEvent := anEvent. result := focusHolder handleFocusEvent: (anEvent transformedBy: (focusHolder transformedFrom: self))] in HandMorph>>sendFocusEvent:to:clear: Receiver: a HandMorph(843055104) Arguments and temporary variables: anEvent: [keystroke '<Cmd-d>'] focusHolder: a TextMorphForEditView(375390208) result: #(nil) Receiver's instance variables: bounds: (336@180) corner: (352@196) owner: a PasteUpMorph(425197568) [world] submorphs: #() fullBounds: nil color: Color blue extension: a MorphExtension (141295616) [eventHandler = an EventHandler] [othe...etc... mouseFocus: nil keyboardFocus: nil eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [(336@180) mouseOver nil nil] targetOffset: (91.0@64.0) damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: true temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil lastEventBuffer: #(1 1543742 336 180 0 0 0 1) lastKeyScanCode: 13 combinedChar: nil eventSource: nil lastSystemEvent: nil captureBlock: nil --- The full stack --- MethodDictionary(Dictionary)>>errorKeyNotFound: [self errorKeyNotFound: key] in MethodDictionary(Dictionary)>>at: MethodDictionary>>at:ifAbsent: MethodDictionary(Dictionary)>>at: UndefinedObject class(Behavior)>>compiledMethodAt: UndefinedObject class(Behavior)>>>> RGMethodDefinition class>>realClass:selector: CompiledMethod>>methodReference Deprecation>>method:explanation:on:in: Deprecation class>>method:explanation:on:in: SmallInteger(Object)>>deprecated:on:in: UndefinedObject>>DoIt Compiler>>evaluate:in:to:notifying:ifFail:logged: [rcvr class evaluatorClass new evaluate: self selectionForDoitAsStream in: ctxt to: rcvr notifying: self morph ifFail: [self morph flash. ^ nil] logged: true] in SmalltalkEditor>>evaluateSelectionAndDo: BlockClosure>>on:do: SmalltalkEditor>>evaluateSelectionAndDo: SmalltalkEditor>>evaluateSelection SmalltalkEditor>>doIt SmalltalkEditor>>doIt: SmalltalkEditor(TextEditor)>>performCmdActionsWith:shifted:return: SmalltalkEditor(TextEditor)>>dispatchCommandOn:return: SmalltalkEditor(TextEditor)>>dispatchOn: [self dispatchOn: aKeyboardEvent] in SmalltalkEditor(TextEditor)>>keystroke: SmalltalkEditor(TextEditor)>>handleKeystrokeAction: SmalltalkEditor(TextEditor)>>handleEditionAction:fromKeyboardEvent: SmalltalkEditor(TextEditor)>>keystroke: [editor keystroke: evt] in [| action | evt keyValue = 13 ifTrue: [action := self crAction. action ifNotNil: [evt hand newKeyboardFocus: nil. ^ action value]]. self handleInteraction: [editor keystroke: evt]. self updateFromParagraph. super keyStroke: evt] in TextMorphForEditView(TextMorph)>>keyStroke: TextMorphForEditView(TextMorph)>>handleInteraction: TextMorphForEditView>>handleInteraction: [| action | evt keyValue = 13 ifTrue: [action := self crAction. action ifNotNil: [evt hand newKeyboardFocus: nil. ^ action value]]. self handleInteraction: [editor keystroke: evt]. self updateFromParagraph. super keyStroke: evt] in TextMorphForEditView(TextMorph)>>keyStroke: ToolRegistry>>codeCompletionAround:textMorph:keyStroke: SmalltalkEditor>>codeCompletionAround:textMorph:keyStroke: TextMorphForEditView(TextMorph)>>keyStroke: TextMorphForEditView>>keyStroke: TextMorphForEditView(TextMorph)>>handleKeystroke: KeyboardEvent>>sentTo: TextMorphForEditView(Morph)>>handleEvent: TextMorphForEditView(Morph)>>handleFocusEvent: [ActiveHand := self. ActiveEvent := anEvent. result := focusHolder handleFocusEvent: (anEvent transformedBy: (focusHolder transformedFrom: self))] in HandMorph>>sendFocusEvent:to:clear: - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - [aBlock value] in PasteUpMorph>>becomeActiveDuring: BlockClosure>>on:do: PasteUpMorph>>becomeActiveDuring: HandMorph>>sendFocusEvent:to:clear: HandMorph>>sendEvent:focus:clear: HandMorph>>sendKeyboardEvent: HandMorph>>handleEvent: HandMorph>>processEvents [:h | ActiveHand := h. h processEvents. ActiveHand := nil] in WorldState>>doOneCycleNowFor: Array(SequenceableCollection)>>do: WorldState>>handsDo: WorldState>>doOneCycleNowFor: WorldState>>doOneCycleFor: PasteUpMorph>>doOneCycle [[World doOneCycle. Processor yield. false] whileFalse. nil] in MorphicUIManager>>spawnNewProcess [self value. Processor terminateActive] in BlockClosure>>newProcess _______________________________________________ Pharo-bugtracker mailing list [hidden email] http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-bugtracker |
Updates:
Cc: [hidden email] Comment #1 on issue 5185 by marianopeck: DoIt not found in methodDict http://code.google.com/p/pharo/issues/detail?id=5185 Yes, it seems it does not support doIts. But anyway, I don't think this is a big deal. Isn't it correct to throw an error? Ok, maybe the error should be clearer, in whihc case just asking #isDoIt to the selector and do something different can work. _______________________________________________ Pharo-bugtracker mailing list [hidden email] http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-bugtracker |
Free forum by Nabble | Edit this page |