Pharo-dev
By thread
pharo-dev@lists.pharo.org
By month
Messages by month
- ----- 2026 -----
- July
- June
- May
- April
- March
- February
- January
- ----- 2025 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2024 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2023 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2022 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2021 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2020 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2019 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2018 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2017 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2016 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2015 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2014 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2013 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2012 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2011 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2010 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2009 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2008 -----
- December
- November
- October
- September
- August
- July
- June
- May
January 2011
- 124 participants
- 2303 messages
Re: [Pharo-project] [ANN] Pharo domains for CI, book, issues, and wiki
by laurent laffont
On Mon, Jan 31, 2011 at 2:47 PM, Adrian Lienhard <adi(a)netstyle.ch> wrote:
> For convenience, we have set up the following domains:
>
> http://issues.pharo-project.org
> http://ci.pharo-project.org
> http://book.pharo-project.org
> http://wiki.pharo-project.org
>
>
Cool ! Thank you Adrian.
Laurent.
> Cheers,
> Adrian
>
> __________________________
> www.adrian-lienhard.ch
> twitter.com/adrianlienhard
>
>
>
Jan. 31, 2011
[Pharo-project] [ANN] Pharo domains for CI, book, issues, and wiki
by Adrian Lienhard
For convenience, we have set up the following domains:
http://issues.pharo-project.org
http://ci.pharo-project.org
http://book.pharo-project.org
http://wiki.pharo-project.org
Cheers,
Adrian
__________________________
www.adrian-lienhard.ch
twitter.com/adrianlienhard
Jan. 31, 2011
[Pharo-project] Text Selection problem in 1.2 dev
by Stéphane Ducasse
hi guys
in 1.2 dev when I play with ProfStef go I get an error after a couple of screens normally 3.
I do not understand why but it looks really a problem with text selection
https://pharo-ic.lille.inria.fr/hudson/view/Pharo/job/Pharo%201.2/
Stef
31 January 2011 2:22 pm
VM: Mac OS - intel - 1064 - Pharo1.1.1 of 12 September 2010 [Latest update: #11414] 21.0
Image: Pharo1.2rc2 [Latest update: #12327]31 January 2011 2:22 pm
VM: Mac OS - intel - 1064 - Pharo1.1.1 of 12 September 2010 [Latest update: #11414] 21.0
Image: Pharo1.2rc2 [Latest update: #12327]
SecurityManager state:
Restricted: false
FileAccess: true
SocketAccess: true
Working Dir /Data/Downloads/Pharo-1.2
Trusted Dir /foobar/tooBar/forSqueak/bogus/
Untrusted Dir /Users/ducasse/Library/Preferences/Squeak/Internet/My Squeak/
ByteString class(Object)>>error:
Receiver: ByteString
Arguments and temporary variables:
aString: 'basicNew: failed'
Receiver's instance variables:
superclass: String
methodDict: a MethodDictionary(#applyLanguageInfomation:->(ByteString>>#applyLa...etc...
format: 23554
instanceVariables: nil
organization: ('*xml-parser' applyLanguageInfomation:)
('accessing' at: at:put:...etc...
subclasses: nil
name: #ByteString
classPool: a Dictionary(#NonAsciiMap->#[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0...etc...
sharedPools: nil
environment: a SystemDictionary(lots of globals)
category: #'Collections-Strings'
traitComposition: {}
localSelectors: nil
ByteString class(Object)>>primitiveFailed:
Receiver: ByteString
Arguments and temporary variables:
selector: #basicNew:
Receiver's instance variables:
superclass: String
methodDict: a MethodDictionary(#applyLanguageInfomation:->(ByteString>>#applyLa...etc...
format: 23554
instanceVariables: nil
organization: ('*xml-parser' applyLanguageInfomation:)
('accessing' at: at:put:...etc...
subclasses: nil
name: #ByteString
classPool: a Dictionary(#NonAsciiMap->#[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0...etc...
sharedPools: nil
environment: a SystemDictionary(lots of globals)
category: #'Collections-Strings'
traitComposition: {}
localSelectors: nil
ByteString class(Object)>>primitiveFailed
Receiver: ByteString
Arguments and temporary variables:
Receiver's instance variables:
superclass: String
methodDict: a MethodDictionary(#applyLanguageInfomation:->(ByteString>>#applyLa...etc...
format: 23554
instanceVariables: nil
organization: ('*xml-parser' applyLanguageInfomation:)
('accessing' at: at:put:...etc...
subclasses: nil
name: #ByteString
classPool: a Dictionary(#NonAsciiMap->#[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0...etc...
sharedPools: nil
environment: a SystemDictionary(lots of globals)
category: #'Collections-Strings'
traitComposition: {}
localSelectors: nil
ByteString class(Behavior)>>basicNew:
Receiver: ByteString
Arguments and temporary variables:
sizeRequested: -1
Receiver's instance variables:
superclass: String
methodDict: a MethodDictionary(#applyLanguageInfomation:->(ByteString>>#applyLa...etc...
format: 23554
instanceVariables: nil
organization: ('*xml-parser' applyLanguageInfomation:)
('accessing' at: at:put:...etc...
subclasses: nil
name: #ByteString
classPool: a Dictionary(#NonAsciiMap->#[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0...etc...
sharedPools: nil
environment: a SystemDictionary(lots of globals)
category: #'Collections-Strings'
traitComposition: {}
localSelectors: nil
ByteString class(String class)>>new:
Receiver: ByteString
Arguments and temporary variables:
sizeRequested: -1
Receiver's instance variables:
superclass: String
methodDict: a MethodDictionary(#applyLanguageInfomation:->(ByteString>>#applyLa...etc...
format: 23554
instanceVariables: nil
organization: ('*xml-parser' applyLanguageInfomation:)
('accessing' at: at:put:...etc...
subclasses: nil
name: #ByteString
classPool: a Dictionary(#NonAsciiMap->#[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0...etc...
sharedPools: nil
environment: a SystemDictionary(lots of globals)
category: #'Collections-Strings'
traitComposition: {}
localSelectors: nil
ByteString(SequenceableCollection)>>copyFrom:to:
Receiver: '"Now you''re a Do It master ! Let''s talk about printing. It''s a Do It which prints the ...etc...
Arguments and temporary variables:
start: 550
stop: 548
newSize: -1
Receiver's instance variables:
'"Now you''re a Do It master ! Let''s talk about printing. It''s a Do It which prints the ...etc...
Text>>copyFrom:to:
Receiver: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It''s a Do It which ...etc...
Arguments and temporary variables:
start: 550
stop: 563
realStart: 550
realStop: 548
Receiver's instance variables:
string: '"Now you''re a Do It master ! Let''s talk about printing. It''s a Do I...etc...
runs: a RunArray runs: #(212 2 1 1 1 1 1 1 2 166 2 4 1 5 1 2 4 1 3 1 2 79 2 14 ...etc...
SmalltalkEditor(TextEditor)>>selection
Receiver: a SmalltalkEditor
Arguments and temporary variables:
Receiver's instance variables:
morph: a TextMorphForEditView(786432)
selectionShowing: true
model: a LessonView
editingState: a SmalltalkEditingState
Compiler>>evaluate:in:to:notifying:ifFail:logged:
Receiver: a Compiler
Arguments and temporary variables:
textOrStream: a ReadWriteStream '"Cool ! (I like to say Cooool :) ). You''ve ju...etc...
aContext: nil
receiver: nil
aRequestor: a SmalltalkEditor
failBlock: [FakeClassPool adopt: nil.
^ #failedDoit]
logFlag: true
methodNode: DoIt
^ ProfStef next
method: (UndefinedObject>>#DoIt "a CompiledMethod(656408576)")
value: a LessonView
toLog: nil
itsSelection: nil
itsSelectionString: nil
Receiver's instance variables:
sourceStream: a ReadWriteStream '"Cool ! (I like to say Cooool :) ). You''ve ju...etc...
requestor: a SmalltalkEditor
class: UndefinedObject
category: nil
context: nil
parser: a Parser
[rcvr class evaluatorClass new
evaluate: self selectionForDoitAsStream
in: ctxt
to: rcvr
notifying: self
ifFail: [FakeClassPool adopt: nil.
^ #failedDoit]
logged: true] in SmalltalkEditor>>evaluateSelection
Receiver: a SmalltalkEditor
Arguments and temporary variables:
rcvr: nil
ctxt: nil
Receiver's instance variables:
morph: a TextMorphForEditView(786432)
selectionShowing: true
model: a LessonView
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>>evaluateSelection
startpc: 116
numArgs: 0
SmalltalkEditor>>evaluateSelection
Receiver: a SmalltalkEditor
Arguments and temporary variables:
result: nil
rcvr: nil
ctxt: nil
Receiver's instance variables:
morph: a TextMorphForEditView(786432)
selectionShowing: true
model: a LessonView
editingState: a SmalltalkEditingState
SmalltalkEditor>>doIt
Receiver: a SmalltalkEditor
Arguments and temporary variables:
Receiver's instance variables:
morph: a TextMorphForEditView(786432)
selectionShowing: true
model: a LessonView
editingState: a SmalltalkEditingState
SmalltalkEditor>>doIt:
Receiver: a SmalltalkEditor
Arguments and temporary variables:
aKeyboardEvent: [keystroke '<Cmd-d>']
Receiver's instance variables:
morph: a TextMorphForEditView(786432)
selectionShowing: true
model: a LessonView
editingState: a SmalltalkEditingState
SmalltalkEditor(TextEditor)>>dispatchOn:
Receiver: a SmalltalkEditor
Arguments and temporary variables:
aKeyboardEvent: [keystroke '<Cmd-d>']
asciiValue: 100
honorCommandKeys: true
char: nil
Receiver's instance variables:
morph: a TextMorphForEditView(786432)
selectionShowing: true
model: a LessonView
editingState: a SmalltalkEditingState
SmalltalkEditor(TextEditor)>>processKeyStroke:
Receiver: a SmalltalkEditor
Arguments and temporary variables:
aKeyboardEvent: [keystroke '<Cmd-d>']
Receiver's instance variables:
morph: a TextMorphForEditView(786432)
selectionShowing: true
model: a LessonView
editingState: a SmalltalkEditingState
SmalltalkEditor(TextEditor)>>keystroke:
Receiver: a SmalltalkEditor
Arguments and temporary variables:
aKeyboardEvent: [keystroke '<Cmd-d>']
Receiver's instance variables:
morph: a TextMorphForEditView(786432)
selectionShowing: true
model: a LessonView
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(786432)
Arguments and temporary variables:
evt: [keystroke '<Cmd-d>']
Receiver's instance variables:
bounds: 0@0 corner: 450@354
owner: a TransformMorph(1005322240)
submorphs: #()
fullBounds: 0@0 corner: 450@354
color: Color black
extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc...
borderWidth: 0
borderColor: Color black
textStyle: a TextStyle Bitmap DejaVu Sans 9
text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc...
wrapFlag: true
paragraph: a MultiNewParagraph
editor: a SmalltalkEditor
container: nil
predecessor: nil
successor: nil
backgroundColor: nil
margins: nil
editView: a PluggableShoutMorph(1061158912)
acceptOnCR: false
TextMorphForEditView(TextMorph)>>handleInteraction:
Receiver: a TextMorphForEditView(786432)
Arguments and temporary variables:
interactionBlock: [editor keystroke: evt]
oldEditor: a SmalltalkEditor
oldParagraph: a MultiNewParagraph
oldText: a Text for '"Cool ! (I like to say Cooool :) ). You''ve just executed ...etc...
Receiver's instance variables:
bounds: 0@0 corner: 450@354
owner: a TransformMorph(1005322240)
submorphs: #()
fullBounds: 0@0 corner: 450@354
color: Color black
extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc...
borderWidth: 0
borderColor: Color black
textStyle: a TextStyle Bitmap DejaVu Sans 9
text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc...
wrapFlag: true
paragraph: a MultiNewParagraph
editor: a SmalltalkEditor
container: nil
predecessor: nil
successor: nil
backgroundColor: nil
margins: nil
editView: a PluggableShoutMorph(1061158912)
acceptOnCR: false
TextMorphForEditView>>handleInteraction:
Receiver: a TextMorphForEditView(786432)
Arguments and temporary variables:
interActionBlock: [editor keystroke: evt]
Receiver's instance variables:
bounds: 0@0 corner: 450@354
owner: a TransformMorph(1005322240)
submorphs: #()
fullBounds: 0@0 corner: 450@354
color: Color black
extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc...
borderWidth: 0
borderColor: Color black
textStyle: a TextStyle Bitmap DejaVu Sans 9
text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc...
wrapFlag: true
paragraph: a MultiNewParagraph
editor: a SmalltalkEditor
container: nil
predecessor: nil
successor: nil
backgroundColor: nil
margins: nil
editView: a PluggableShoutMorph(1061158912)
acceptOnCR: false
[| 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(786432)
Arguments and temporary variables:
evt: [keystroke '<Cmd-d>']
action: nil
Receiver's instance variables:
bounds: 0@0 corner: 450@354
owner: a TransformMorph(1005322240)
submorphs: #()
fullBounds: 0@0 corner: 450@354
color: Color black
extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc...
borderWidth: 0
borderColor: Color black
textStyle: a TextStyle Bitmap DejaVu Sans 9
text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc...
wrapFlag: true
paragraph: a MultiNewParagraph
editor: a SmalltalkEditor
container: nil
predecessor: nil
successor: nil
backgroundColor: nil
margins: nil
editView: a PluggableShoutMorph(1061158912)
acceptOnCR: false
ECToolSet class>>codeCompletionAround:textMorph:keyStroke:
Receiver: ECToolSet
Arguments and temporary variables:
aBlock: [| action |
evt keyValue = 13
ifTrue: [action := self crAction.
ac...etc...
aTextMorph: a TextMorphForEditView(786432)
evt: [keystroke '<Cmd-d>']
completionAllowed: false
editor: a SmalltalkEditor
stringHolder: a LessonView
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: a SystemDictionary(lots of globals)
category: #'Ocompletion-ECSqueak'
traitComposition: {}
localSelectors: nil
DEVToolSet class>>codeCompletionAround:textMorph:keyStroke:
Receiver: DEVToolSet
Arguments and temporary variables:
aBlock: [| action |
evt keyValue = 13
ifTrue: [action := self crAction.
ac...etc...
aTextMorph: a TextMorphForEditView(786432)
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: a SystemDictionary(lots of globals)
category: #ImageForDevelopers
traitComposition: {}
localSelectors: nil
ToolSet class>>codeCompletionAround:textMorph:keyStroke:
Receiver: ToolSet
Arguments and temporary variables:
aBlock: [| action |
evt keyValue = 13
ifTrue: [action := self crAction.
ac...etc...
aTextMorph: a TextMorphForEditView(786432)
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: a SystemDictionary(lots of globals)
category: #'System-Applications'
traitComposition: nil
localSelectors: nil
registeredClasses: an OrderedCollection(StandardToolSet ECToolSet DEVToolSet)
default: DEVToolSet
TextMorphForEditView(TextMorph)>>keyStroke:
Receiver: a TextMorphForEditView(786432)
Arguments and temporary variables:
evt: [keystroke '<Cmd-d>']
Receiver's instance variables:
bounds: 0@0 corner: 450@354
owner: a TransformMorph(1005322240)
submorphs: #()
fullBounds: 0@0 corner: 450@354
color: Color black
extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc...
borderWidth: 0
borderColor: Color black
textStyle: a TextStyle Bitmap DejaVu Sans 9
text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc...
wrapFlag: true
paragraph: a MultiNewParagraph
editor: a SmalltalkEditor
container: nil
predecessor: nil
successor: nil
backgroundColor: nil
margins: nil
editView: a PluggableShoutMorph(1061158912)
acceptOnCR: false
TextMorphForEditView>>keyStroke:
Receiver: a TextMorphForEditView(786432)
Arguments and temporary variables:
evt: [keystroke '<Cmd-d>']
view: a PluggableShoutMorph(1061158912)
Receiver's instance variables:
bounds: 0@0 corner: 450@354
owner: a TransformMorph(1005322240)
submorphs: #()
fullBounds: 0@0 corner: 450@354
color: Color black
extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc...
borderWidth: 0
borderColor: Color black
textStyle: a TextStyle Bitmap DejaVu Sans 9
text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc...
wrapFlag: true
paragraph: a MultiNewParagraph
editor: a SmalltalkEditor
container: nil
predecessor: nil
successor: nil
backgroundColor: nil
margins: nil
editView: a PluggableShoutMorph(1061158912)
acceptOnCR: false
TextMorphForEditView(TextMorph)>>handleKeystroke:
Receiver: a TextMorphForEditView(786432)
Arguments and temporary variables:
anEvent: [keystroke '<Cmd-d>']
pasteUp: nil
Receiver's instance variables:
bounds: 0@0 corner: 450@354
owner: a TransformMorph(1005322240)
submorphs: #()
fullBounds: 0@0 corner: 450@354
color: Color black
extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc...
borderWidth: 0
borderColor: Color black
textStyle: a TextStyle Bitmap DejaVu Sans 9
text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc...
wrapFlag: true
paragraph: a MultiNewParagraph
editor: a SmalltalkEditor
container: nil
predecessor: nil
successor: nil
backgroundColor: nil
margins: nil
editView: a PluggableShoutMorph(1061158912)
acceptOnCR: false
KeyboardEvent>>sentTo:
Receiver: [keystroke '<Cmd-d>']
Arguments and temporary variables:
anObject: a TextMorphForEditView(786432)
Receiver's instance variables:
timeStamp: 12927
source: a HandMorph(843055104)
windowIndex: nil
type: #keystroke
buttons: 64
position: 15@310
handler: nil
wasHandled: true
keyValue: 100
charCode: 100
scanCode: 2
TextMorphForEditView(Morph)>>handleEvent:
Receiver: a TextMorphForEditView(786432)
Arguments and temporary variables:
anEvent: [keystroke '<Cmd-d>']
Receiver's instance variables:
bounds: 0@0 corner: 450@354
owner: a TransformMorph(1005322240)
submorphs: #()
fullBounds: 0@0 corner: 450@354
color: Color black
extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc...
borderWidth: 0
borderColor: Color black
textStyle: a TextStyle Bitmap DejaVu Sans 9
text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc...
wrapFlag: true
paragraph: a MultiNewParagraph
editor: a SmalltalkEditor
container: nil
predecessor: nil
successor: nil
backgroundColor: nil
margins: nil
editView: a PluggableShoutMorph(1061158912)
acceptOnCR: false
TextMorphForEditView(Morph)>>handleFocusEvent:
Receiver: a TextMorphForEditView(786432)
Arguments and temporary variables:
anEvent: [keystroke '<Cmd-d>']
Receiver's instance variables:
bounds: 0@0 corner: 450@354
owner: a TransformMorph(1005322240)
submorphs: #()
fullBounds: 0@0 corner: 450@354
color: Color black
extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc...
borderWidth: 0
borderColor: Color black
textStyle: a TextStyle Bitmap DejaVu Sans 9
text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc...
wrapFlag: true
paragraph: a MultiNewParagraph
editor: a SmalltalkEditor
container: nil
predecessor: nil
successor: nil
backgroundColor: nil
margins: nil
editView: a PluggableShoutMorph(1061158912)
acceptOnCR: false
[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(786432)
result: #(nil)
Receiver's instance variables:
bounds: 435@557 corner: 451@573
owner: a PasteUpMorph(425197568) [world]
submorphs: #()
fullBounds: 435@557 corner: 451@573
color: Color blue
extension: a MorphExtension (141295616) [eventHandler = an EventHandler]
mouseFocus: nil
keyboardFocus: nil
eventListeners: nil
mouseListeners: nil
keyboardListeners: nil
mouseClickState: nil
mouseOverHandler: a MouseOverHandler
lastMouseEvent: [438@556 435@557 mouseMove 41062 nil]
targetOffset: 93@0
damageRecorder: a DamageRecorder
cacheCanvas: nil
cachedCanvasHasHoles: false
temporaryCursor: nil
temporaryCursorOffset: nil
hardwareCursor: nil
hasChanged: true
savedPatch: nil
userInitials: ''
lastEventBuffer: #(1 41062 437 557 0 0 0 1)
lastKeyScanCode: 36
combinedChar: nil
[aBlock value] in PasteUpMorph>>becomeActiveDuring:
Receiver: a PasteUpMorph(425197568) [world]
Arguments and temporary variables:
aBlock: [ActiveHand := self.
ActiveEvent := anEvent.
result := focusHolder
...etc...
Receiver's instance variables:
bounds: 0@0 corner: 976@662
owner: nil
submorphs: an Array(a TaskbarMorph(811335680) a SystemWindow(599785472) a Syste...etc...
fullBounds: 0@0 corner: 976@662
color: (Color r: 0.97 g: 0.98 b: 1.0)
extension: a MorphExtension (666632192) [eventHandler = an EventHandler] [othe...etc...
borderWidth: 0
borderColor: (Color r: 0.03 g: 0.02 b: 0.0)
backgroundMorph: nil
worldState: a WorldState
griddingOn: nil
BlockClosure>>on:do:
Receiver: [aBlock value]
Arguments and temporary variables:
exception: Error
handlerAction: [:ex |
ActiveWorld := priorWorld.
ActiveEvent := priorEvent.
...etc...
handlerActive: false
Receiver's instance variables:
outerContext: PasteUpMorph>>becomeActiveDuring:
startpc: 67
numArgs: 0
PasteUpMorph>>becomeActiveDuring:
Receiver: a PasteUpMorph(425197568) [world]
Arguments and temporary variables:
aBlock: [ActiveHand := self.
ActiveEvent := anEvent.
result := focusHolder
...etc...
priorWorld: a PasteUpMorph(425197568) [world]
priorHand: a HandMorph(843055104)
priorEvent: nil
Receiver's instance variables:
bounds: 0@0 corner: 976@662
owner: nil
submorphs: an Array(a TaskbarMorph(811335680) a SystemWindow(599785472) a Syste...etc...
fullBounds: 0@0 corner: 976@662
color: (Color r: 0.97 g: 0.98 b: 1.0)
extension: a MorphExtension (666632192) [eventHandler = an EventHandler] [othe...etc...
borderWidth: 0
borderColor: (Color r: 0.03 g: 0.02 b: 0.0)
backgroundMorph: nil
worldState: a WorldState
griddingOn: nil
HandMorph>>sendFocusEvent:to:clear:
Receiver: a HandMorph(843055104)
Arguments and temporary variables:
anEvent: [keystroke '<Cmd-d>']
focusHolder: a TextMorphForEditView(786432)
aBlock: [self keyboardFocus: nil]
w: a PasteUpMorph(425197568) [world]
result: #(nil)
Receiver's instance variables:
bounds: 435@557 corner: 451@573
owner: a PasteUpMorph(425197568) [world]
submorphs: #()
fullBounds: 435@557 corner: 451@573
color: Color blue
extension: a MorphExtension (141295616) [eventHandler = an EventHandler]
mouseFocus: nil
keyboardFocus: nil
eventListeners: nil
mouseListeners: nil
keyboardListeners: nil
mouseClickState: nil
mouseOverHandler: a MouseOverHandler
lastMouseEvent: [438@556 435@557 mouseMove 41062 nil]
targetOffset: 93@0
damageRecorder: a DamageRecorder
cacheCanvas: nil
cachedCanvasHasHoles: false
temporaryCursor: nil
temporaryCursorOffset: nil
hardwareCursor: nil
hasChanged: true
savedPatch: nil
userInitials: ''
lastEventBuffer: #(1 41062 437 557 0 0 0 1)
lastKeyScanCode: 36
combinedChar: nil
HandMorph>>sendEvent:focus:clear:
Receiver: a HandMorph(843055104)
Arguments and temporary variables:
anEvent: [keystroke '<Cmd-d>']
focusHolder: a TextMorphForEditView(786432)
aBlock: [self keyboardFocus: nil]
result: nil
Receiver's instance variables:
bounds: 435@557 corner: 451@573
owner: a PasteUpMorph(425197568) [world]
submorphs: #()
fullBounds: 435@557 corner: 451@573
color: Color blue
extension: a MorphExtension (141295616) [eventHandler = an EventHandler]
mouseFocus: nil
keyboardFocus: nil
eventListeners: nil
mouseListeners: nil
keyboardListeners: nil
mouseClickState: nil
mouseOverHandler: a MouseOverHandler
lastMouseEvent: [438@556 435@557 mouseMove 41062 nil]
targetOffset: 93@0
damageRecorder: a DamageRecorder
cacheCanvas: nil
cachedCanvasHasHoles: false
temporaryCursor: nil
temporaryCursorOffset: nil
hardwareCursor: nil
hasChanged: true
savedPatch: nil
userInitials: ''
lastEventBuffer: #(1 41062 437 557 0 0 0 1)
lastKeyScanCode: 36
combinedChar: nil
HandMorph>>sendKeyboardEvent:
Receiver: a HandMorph(843055104)
Arguments and temporary variables:
anEvent: [keystroke '<Cmd-d>']
Receiver's instance variables:
bounds: 435@557 corner: 451@573
owner: a PasteUpMorph(425197568) [world]
submorphs: #()
fullBounds: 435@557 corner: 451@573
color: Color blue
extension: a MorphExtension (141295616) [eventHandler = an EventHandler]
mouseFocus: nil
keyboardFocus: nil
eventListeners: nil
mouseListeners: nil
keyboardListeners: nil
mouseClickState: nil
mouseOverHandler: a MouseOverHandler
lastMouseEvent: [438@556 435@557 mouseMove 41062 nil]
targetOffset: 93@0
damageRecorder: a DamageRecorder
cacheCanvas: nil
cachedCanvasHasHoles: false
temporaryCursor: nil
temporaryCursorOffset: nil
hardwareCursor: nil
hasChanged: true
savedPatch: nil
userInitials: ''
lastEventBuffer: #(1 41062 437 557 0 0 0 1)
lastKeyScanCode: 36
combinedChar: nil
HandMorph>>handleEvent:
Receiver: a HandMorph(843055104)
Arguments and temporary variables:
anEvent: [keystroke '<Cmd-d>']
evt: [keystroke '<Cmd-d>']
ofs: nil
Receiver's instance variables:
bounds: 435@557 corner: 451@573
owner: a PasteUpMorph(425197568) [world]
submorphs: #()
fullBounds: 435@557 corner: 451@573
color: Color blue
extension: a MorphExtension (141295616) [eventHandler = an EventHandler]
mouseFocus: nil
keyboardFocus: nil
eventListeners: nil
mouseListeners: nil
keyboardListeners: nil
mouseClickState: nil
mouseOverHandler: a MouseOverHandler
lastMouseEvent: [438@556 435@557 mouseMove 41062 nil]
targetOffset: 93@0
damageRecorder: a DamageRecorder
cacheCanvas: nil
cachedCanvasHasHoles: false
temporaryCursor: nil
temporaryCursorOffset: nil
hardwareCursor: nil
hasChanged: true
savedPatch: nil
userInitials: ''
lastEventBuffer: #(1 41062 437 557 0 0 0 1)
lastKeyScanCode: 36
combinedChar: nil
HandMorph>>processEvents
Receiver: a HandMorph(843055104)
Arguments and temporary variables:
evt: [keystroke '<Cmd-d>']
evtBuf: #(2 12927 100 0 8 100 0 1)
type: 2
hadAny: true
Receiver's instance variables:
bounds: 435@557 corner: 451@573
owner: a PasteUpMorph(425197568) [world]
submorphs: #()
fullBounds: 435@557 corner: 451@573
color: Color blue
extension: a MorphExtension (141295616) [eventHandler = an EventHandler]
mouseFocus: nil
keyboardFocus: nil
eventListeners: nil
mouseListeners: nil
keyboardListeners: nil
mouseClickState: nil
mouseOverHandler: a MouseOverHandler
lastMouseEvent: [438@556 435@557 mouseMove 41062 nil]
targetOffset: 93@0
damageRecorder: a DamageRecorder
cacheCanvas: nil
cachedCanvasHasHoles: false
temporaryCursor: nil
temporaryCursorOffset: nil
hardwareCursor: nil
hasChanged: true
savedPatch: nil
userInitials: ''
lastEventBuffer: #(1 41062 437 557 0 0 0 1)
lastKeyScanCode: 36
combinedChar: nil
--- The full stack ---
ByteString class(Object)>>error:
ByteString class(Object)>>primitiveFailed:
ByteString class(Object)>>primitiveFailed
ByteString class(Behavior)>>basicNew:
ByteString class(String class)>>new:
ByteString(SequenceableCollection)>>copyFrom:to:
Text>>copyFrom:to:
SmalltalkEditor(TextEditor)>>selection
Compiler>>evaluate:in:to:notifying:ifFail:logged:
[rcvr class evaluatorClass new
evaluate: self selectionForDoitAsStream
in: ctxt
to: rcvr
notifying: self
ifFail: [FakeClassPool adopt: nil.
^ #failedDoit]
logged: true] in SmalltalkEditor>>evaluateSelection
BlockClosure>>on:do:
SmalltalkEditor>>evaluateSelection
SmalltalkEditor>>doIt
SmalltalkEditor>>doIt:
SmalltalkEditor(TextEditor)>>dispatchOn:
SmalltalkEditor(TextEditor)>>processKeyStroke:
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:
ECToolSet class>>codeCompletionAround:textMorph:keyStroke:
DEVToolSet class>>codeCompletionAround:textMorph:keyStroke:
ToolSet class>>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 Project class>>spawnNewProcess
[self value.
Processor terminateActive] in BlockClosure>>newProcess
SecurityManager state:
Restricted: false
FileAccess: true
SocketAccess: true
Working Dir /Data/Downloads/Pharo-1.2
Trusted Dir /foobar/tooBar/forSqueak/bogus/
Untrusted Dir /Users/ducasse/Library/Preferences/Squeak/Internet/My Squeak/
ByteString class(Object)>>error:
Receiver: ByteString
Arguments and temporary variables:
aString: 'basicNew: failed'
Receiver's instance variables:
superclass: String
methodDict: a MethodDictionary(#applyLanguageInfomation:->(ByteString>>#applyLa...etc...
format: 23554
instanceVariables: nil
organization: ('*xml-parser' applyLanguageInfomation:)
('accessing' at: at:put:...etc...
subclasses: nil
name: #ByteString
classPool: a Dictionary(#NonAsciiMap->#[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0...etc...
sharedPools: nil
environment: a SystemDictionary(lots of globals)
category: #'Collections-Strings'
traitComposition: {}
localSelectors: nil
ByteString class(Object)>>primitiveFailed:
Receiver: ByteString
Arguments and temporary variables:
selector: #basicNew:
Receiver's instance variables:
superclass: String
methodDict: a MethodDictionary(#applyLanguageInfomation:->(ByteString>>#applyLa...etc...
format: 23554
instanceVariables: nil
organization: ('*xml-parser' applyLanguageInfomation:)
('accessing' at: at:put:...etc...
subclasses: nil
name: #ByteString
classPool: a Dictionary(#NonAsciiMap->#[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0...etc...
sharedPools: nil
environment: a SystemDictionary(lots of globals)
category: #'Collections-Strings'
traitComposition: {}
localSelectors: nil
ByteString class(Object)>>primitiveFailed
Receiver: ByteString
Arguments and temporary variables:
Receiver's instance variables:
superclass: String
methodDict: a MethodDictionary(#applyLanguageInfomation:->(ByteString>>#applyLa...etc...
format: 23554
instanceVariables: nil
organization: ('*xml-parser' applyLanguageInfomation:)
('accessing' at: at:put:...etc...
subclasses: nil
name: #ByteString
classPool: a Dictionary(#NonAsciiMap->#[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0...etc...
sharedPools: nil
environment: a SystemDictionary(lots of globals)
category: #'Collections-Strings'
traitComposition: {}
localSelectors: nil
ByteString class(Behavior)>>basicNew:
Receiver: ByteString
Arguments and temporary variables:
sizeRequested: -1
Receiver's instance variables:
superclass: String
methodDict: a MethodDictionary(#applyLanguageInfomation:->(ByteString>>#applyLa...etc...
format: 23554
instanceVariables: nil
organization: ('*xml-parser' applyLanguageInfomation:)
('accessing' at: at:put:...etc...
subclasses: nil
name: #ByteString
classPool: a Dictionary(#NonAsciiMap->#[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0...etc...
sharedPools: nil
environment: a SystemDictionary(lots of globals)
category: #'Collections-Strings'
traitComposition: {}
localSelectors: nil
ByteString class(String class)>>new:
Receiver: ByteString
Arguments and temporary variables:
sizeRequested: -1
Receiver's instance variables:
superclass: String
methodDict: a MethodDictionary(#applyLanguageInfomation:->(ByteString>>#applyLa...etc...
format: 23554
instanceVariables: nil
organization: ('*xml-parser' applyLanguageInfomation:)
('accessing' at: at:put:...etc...
subclasses: nil
name: #ByteString
classPool: a Dictionary(#NonAsciiMap->#[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0...etc...
sharedPools: nil
environment: a SystemDictionary(lots of globals)
category: #'Collections-Strings'
traitComposition: {}
localSelectors: nil
ByteString(SequenceableCollection)>>copyFrom:to:
Receiver: '"Now you''re a Do It master ! Let''s talk about printing. It''s a Do It which prints the ...etc...
Arguments and temporary variables:
start: 550
stop: 548
newSize: -1
Receiver's instance variables:
'"Now you''re a Do It master ! Let''s talk about printing. It''s a Do It which prints the ...etc...
Text>>copyFrom:to:
Receiver: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It''s a Do It which ...etc...
Arguments and temporary variables:
start: 550
stop: 563
realStart: 550
realStop: 548
Receiver's instance variables:
string: '"Now you''re a Do It master ! Let''s talk about printing. It''s a Do I...etc...
runs: a RunArray runs: #(212 2 1 1 1 1 1 1 2 166 2 4 1 5 1 2 4 1 3 1 2 79 2 14 ...etc...
SmalltalkEditor(TextEditor)>>selection
Receiver: a SmalltalkEditor
Arguments and temporary variables:
Receiver's instance variables:
morph: a TextMorphForEditView(786432)
selectionShowing: true
model: a LessonView
editingState: a SmalltalkEditingState
Compiler>>evaluate:in:to:notifying:ifFail:logged:
Receiver: a Compiler
Arguments and temporary variables:
textOrStream: a ReadWriteStream '"Cool ! (I like to say Cooool :) ). You''ve ju...etc...
aContext: nil
receiver: nil
aRequestor: a SmalltalkEditor
failBlock: [FakeClassPool adopt: nil.
^ #failedDoit]
logFlag: true
methodNode: DoIt
^ ProfStef next
method: (UndefinedObject>>#DoIt "a CompiledMethod(656408576)")
value: a LessonView
toLog: nil
itsSelection: nil
itsSelectionString: nil
Receiver's instance variables:
sourceStream: a ReadWriteStream '"Cool ! (I like to say Cooool :) ). You''ve ju...etc...
requestor: a SmalltalkEditor
class: UndefinedObject
category: nil
context: nil
parser: a Parser
[rcvr class evaluatorClass new
evaluate: self selectionForDoitAsStream
in: ctxt
to: rcvr
notifying: self
ifFail: [FakeClassPool adopt: nil.
^ #failedDoit]
logged: true] in SmalltalkEditor>>evaluateSelection
Receiver: a SmalltalkEditor
Arguments and temporary variables:
rcvr: nil
ctxt: nil
Receiver's instance variables:
morph: a TextMorphForEditView(786432)
selectionShowing: true
model: a LessonView
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>>evaluateSelection
startpc: 116
numArgs: 0
SmalltalkEditor>>evaluateSelection
Receiver: a SmalltalkEditor
Arguments and temporary variables:
result: nil
rcvr: nil
ctxt: nil
Receiver's instance variables:
morph: a TextMorphForEditView(786432)
selectionShowing: true
model: a LessonView
editingState: a SmalltalkEditingState
SmalltalkEditor>>doIt
Receiver: a SmalltalkEditor
Arguments and temporary variables:
Receiver's instance variables:
morph: a TextMorphForEditView(786432)
selectionShowing: true
model: a LessonView
editingState: a SmalltalkEditingState
SmalltalkEditor>>doIt:
Receiver: a SmalltalkEditor
Arguments and temporary variables:
aKeyboardEvent: [keystroke '<Cmd-d>']
Receiver's instance variables:
morph: a TextMorphForEditView(786432)
selectionShowing: true
model: a LessonView
editingState: a SmalltalkEditingState
SmalltalkEditor(TextEditor)>>dispatchOn:
Receiver: a SmalltalkEditor
Arguments and temporary variables:
aKeyboardEvent: [keystroke '<Cmd-d>']
asciiValue: 100
honorCommandKeys: true
char: nil
Receiver's instance variables:
morph: a TextMorphForEditView(786432)
selectionShowing: true
model: a LessonView
editingState: a SmalltalkEditingState
SmalltalkEditor(TextEditor)>>processKeyStroke:
Receiver: a SmalltalkEditor
Arguments and temporary variables:
aKeyboardEvent: [keystroke '<Cmd-d>']
Receiver's instance variables:
morph: a TextMorphForEditView(786432)
selectionShowing: true
model: a LessonView
editingState: a SmalltalkEditingState
SmalltalkEditor(TextEditor)>>keystroke:
Receiver: a SmalltalkEditor
Arguments and temporary variables:
aKeyboardEvent: [keystroke '<Cmd-d>']
Receiver's instance variables:
morph: a TextMorphForEditView(786432)
selectionShowing: true
model: a LessonView
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(786432)
Arguments and temporary variables:
evt: [keystroke '<Cmd-d>']
Receiver's instance variables:
bounds: 0@0 corner: 450@354
owner: a TransformMorph(1005322240)
submorphs: #()
fullBounds: 0@0 corner: 450@354
color: Color black
extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc...
borderWidth: 0
borderColor: Color black
textStyle: a TextStyle Bitmap DejaVu Sans 9
text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc...
wrapFlag: true
paragraph: a MultiNewParagraph
editor: a SmalltalkEditor
container: nil
predecessor: nil
successor: nil
backgroundColor: nil
margins: nil
editView: a PluggableShoutMorph(1061158912)
acceptOnCR: false
TextMorphForEditView(TextMorph)>>handleInteraction:
Receiver: a TextMorphForEditView(786432)
Arguments and temporary variables:
interactionBlock: [editor keystroke: evt]
oldEditor: a SmalltalkEditor
oldParagraph: a MultiNewParagraph
oldText: a Text for '"Cool ! (I like to say Cooool :) ). You''ve just executed ...etc...
Receiver's instance variables:
bounds: 0@0 corner: 450@354
owner: a TransformMorph(1005322240)
submorphs: #()
fullBounds: 0@0 corner: 450@354
color: Color black
extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc...
borderWidth: 0
borderColor: Color black
textStyle: a TextStyle Bitmap DejaVu Sans 9
text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc...
wrapFlag: true
paragraph: a MultiNewParagraph
editor: a SmalltalkEditor
container: nil
predecessor: nil
successor: nil
backgroundColor: nil
margins: nil
editView: a PluggableShoutMorph(1061158912)
acceptOnCR: false
TextMorphForEditView>>handleInteraction:
Receiver: a TextMorphForEditView(786432)
Arguments and temporary variables:
interActionBlock: [editor keystroke: evt]
Receiver's instance variables:
bounds: 0@0 corner: 450@354
owner: a TransformMorph(1005322240)
submorphs: #()
fullBounds: 0@0 corner: 450@354
color: Color black
extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc...
borderWidth: 0
borderColor: Color black
textStyle: a TextStyle Bitmap DejaVu Sans 9
text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc...
wrapFlag: true
paragraph: a MultiNewParagraph
editor: a SmalltalkEditor
container: nil
predecessor: nil
successor: nil
backgroundColor: nil
margins: nil
editView: a PluggableShoutMorph(1061158912)
acceptOnCR: false
[| 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(786432)
Arguments and temporary variables:
evt: [keystroke '<Cmd-d>']
action: nil
Receiver's instance variables:
bounds: 0@0 corner: 450@354
owner: a TransformMorph(1005322240)
submorphs: #()
fullBounds: 0@0 corner: 450@354
color: Color black
extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc...
borderWidth: 0
borderColor: Color black
textStyle: a TextStyle Bitmap DejaVu Sans 9
text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc...
wrapFlag: true
paragraph: a MultiNewParagraph
editor: a SmalltalkEditor
container: nil
predecessor: nil
successor: nil
backgroundColor: nil
margins: nil
editView: a PluggableShoutMorph(1061158912)
acceptOnCR: false
ECToolSet class>>codeCompletionAround:textMorph:keyStroke:
Receiver: ECToolSet
Arguments and temporary variables:
aBlock: [| action |
evt keyValue = 13
ifTrue: [action := self crAction.
ac...etc...
aTextMorph: a TextMorphForEditView(786432)
evt: [keystroke '<Cmd-d>']
completionAllowed: false
editor: a SmalltalkEditor
stringHolder: a LessonView
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: a SystemDictionary(lots of globals)
category: #'Ocompletion-ECSqueak'
traitComposition: {}
localSelectors: nil
DEVToolSet class>>codeCompletionAround:textMorph:keyStroke:
Receiver: DEVToolSet
Arguments and temporary variables:
aBlock: [| action |
evt keyValue = 13
ifTrue: [action := self crAction.
ac...etc...
aTextMorph: a TextMorphForEditView(786432)
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: a SystemDictionary(lots of globals)
category: #ImageForDevelopers
traitComposition: {}
localSelectors: nil
ToolSet class>>codeCompletionAround:textMorph:keyStroke:
Receiver: ToolSet
Arguments and temporary variables:
aBlock: [| action |
evt keyValue = 13
ifTrue: [action := self crAction.
ac...etc...
aTextMorph: a TextMorphForEditView(786432)
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: a SystemDictionary(lots of globals)
category: #'System-Applications'
traitComposition: nil
localSelectors: nil
registeredClasses: an OrderedCollection(StandardToolSet ECToolSet DEVToolSet)
default: DEVToolSet
TextMorphForEditView(TextMorph)>>keyStroke:
Receiver: a TextMorphForEditView(786432)
Arguments and temporary variables:
evt: [keystroke '<Cmd-d>']
Receiver's instance variables:
bounds: 0@0 corner: 450@354
owner: a TransformMorph(1005322240)
submorphs: #()
fullBounds: 0@0 corner: 450@354
color: Color black
extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc...
borderWidth: 0
borderColor: Color black
textStyle: a TextStyle Bitmap DejaVu Sans 9
text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc...
wrapFlag: true
paragraph: a MultiNewParagraph
editor: a SmalltalkEditor
container: nil
predecessor: nil
successor: nil
backgroundColor: nil
margins: nil
editView: a PluggableShoutMorph(1061158912)
acceptOnCR: false
TextMorphForEditView>>keyStroke:
Receiver: a TextMorphForEditView(786432)
Arguments and temporary variables:
evt: [keystroke '<Cmd-d>']
view: a PluggableShoutMorph(1061158912)
Receiver's instance variables:
bounds: 0@0 corner: 450@354
owner: a TransformMorph(1005322240)
submorphs: #()
fullBounds: 0@0 corner: 450@354
color: Color black
extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc...
borderWidth: 0
borderColor: Color black
textStyle: a TextStyle Bitmap DejaVu Sans 9
text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc...
wrapFlag: true
paragraph: a MultiNewParagraph
editor: a SmalltalkEditor
container: nil
predecessor: nil
successor: nil
backgroundColor: nil
margins: nil
editView: a PluggableShoutMorph(1061158912)
acceptOnCR: false
TextMorphForEditView(TextMorph)>>handleKeystroke:
Receiver: a TextMorphForEditView(786432)
Arguments and temporary variables:
anEvent: [keystroke '<Cmd-d>']
pasteUp: nil
Receiver's instance variables:
bounds: 0@0 corner: 450@354
owner: a TransformMorph(1005322240)
submorphs: #()
fullBounds: 0@0 corner: 450@354
color: Color black
extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc...
borderWidth: 0
borderColor: Color black
textStyle: a TextStyle Bitmap DejaVu Sans 9
text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc...
wrapFlag: true
paragraph: a MultiNewParagraph
editor: a SmalltalkEditor
container: nil
predecessor: nil
successor: nil
backgroundColor: nil
margins: nil
editView: a PluggableShoutMorph(1061158912)
acceptOnCR: false
KeyboardEvent>>sentTo:
Receiver: [keystroke '<Cmd-d>']
Arguments and temporary variables:
anObject: a TextMorphForEditView(786432)
Receiver's instance variables:
timeStamp: 12927
source: a HandMorph(843055104)
windowIndex: nil
type: #keystroke
buttons: 64
position: 15@310
handler: nil
wasHandled: true
keyValue: 100
charCode: 100
scanCode: 2
TextMorphForEditView(Morph)>>handleEvent:
Receiver: a TextMorphForEditView(786432)
Arguments and temporary variables:
anEvent: [keystroke '<Cmd-d>']
Receiver's instance variables:
bounds: 0@0 corner: 450@354
owner: a TransformMorph(1005322240)
submorphs: #()
fullBounds: 0@0 corner: 450@354
color: Color black
extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc...
borderWidth: 0
borderColor: Color black
textStyle: a TextStyle Bitmap DejaVu Sans 9
text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc...
wrapFlag: true
paragraph: a MultiNewParagraph
editor: a SmalltalkEditor
container: nil
predecessor: nil
successor: nil
backgroundColor: nil
margins: nil
editView: a PluggableShoutMorph(1061158912)
acceptOnCR: false
TextMorphForEditView(Morph)>>handleFocusEvent:
Receiver: a TextMorphForEditView(786432)
Arguments and temporary variables:
anEvent: [keystroke '<Cmd-d>']
Receiver's instance variables:
bounds: 0@0 corner: 450@354
owner: a TransformMorph(1005322240)
submorphs: #()
fullBounds: 0@0 corner: 450@354
color: Color black
extension: a MorphExtension (975437824) [other: (myDependents -> a DependentsA...etc...
borderWidth: 0
borderColor: Color black
textStyle: a TextStyle Bitmap DejaVu Sans 9
text: a Text for '"Now you''re a Do It master ! Let''s talk about printing. It'...etc...
wrapFlag: true
paragraph: a MultiNewParagraph
editor: a SmalltalkEditor
container: nil
predecessor: nil
successor: nil
backgroundColor: nil
margins: nil
editView: a PluggableShoutMorph(1061158912)
acceptOnCR: false
[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(786432)
result: #(nil)
Receiver's instance variables:
bounds: 435@557 corner: 451@573
owner: a PasteUpMorph(425197568) [world]
submorphs: #()
fullBounds: 435@557 corner: 451@573
color: Color blue
extension: a MorphExtension (141295616) [eventHandler = an EventHandler]
mouseFocus: nil
keyboardFocus: nil
eventListeners: nil
mouseListeners: nil
keyboardListeners: nil
mouseClickState: nil
mouseOverHandler: a MouseOverHandler
lastMouseEvent: [438@556 435@557 mouseMove 41062 nil]
targetOffset: 93@0
damageRecorder: a DamageRecorder
cacheCanvas: nil
cachedCanvasHasHoles: false
temporaryCursor: nil
temporaryCursorOffset: nil
hardwareCursor: nil
hasChanged: true
savedPatch: nil
userInitials: ''
lastEventBuffer: #(1 41062 437 557 0 0 0 1)
lastKeyScanCode: 36
combinedChar: nil
[aBlock value] in PasteUpMorph>>becomeActiveDuring:
Receiver: a PasteUpMorph(425197568) [world]
Arguments and temporary variables:
aBlock: [ActiveHand := self.
ActiveEvent := anEvent.
result := focusHolder
...etc...
Receiver's instance variables:
bounds: 0@0 corner: 976@662
owner: nil
submorphs: an Array(a TaskbarMorph(811335680) a SystemWindow(599785472) a Syste...etc...
fullBounds: 0@0 corner: 976@662
color: (Color r: 0.97 g: 0.98 b: 1.0)
extension: a MorphExtension (666632192) [eventHandler = an EventHandler] [othe...etc...
borderWidth: 0
borderColor: (Color r: 0.03 g: 0.02 b: 0.0)
backgroundMorph: nil
worldState: a WorldState
griddingOn: nil
BlockClosure>>on:do:
Receiver: [aBlock value]
Arguments and temporary variables:
exception: Error
handlerAction: [:ex |
ActiveWorld := priorWorld.
ActiveEvent := priorEvent.
...etc...
handlerActive: false
Receiver's instance variables:
outerContext: PasteUpMorph>>becomeActiveDuring:
startpc: 67
numArgs: 0
PasteUpMorph>>becomeActiveDuring:
Receiver: a PasteUpMorph(425197568) [world]
Arguments and temporary variables:
aBlock: [ActiveHand := self.
ActiveEvent := anEvent.
result := focusHolder
...etc...
priorWorld: a PasteUpMorph(425197568) [world]
priorHand: a HandMorph(843055104)
priorEvent: nil
Receiver's instance variables:
bounds: 0@0 corner: 976@662
owner: nil
submorphs: an Array(a TaskbarMorph(811335680) a SystemWindow(599785472) a Syste...etc...
fullBounds: 0@0 corner: 976@662
color: (Color r: 0.97 g: 0.98 b: 1.0)
extension: a MorphExtension (666632192) [eventHandler = an EventHandler] [othe...etc...
borderWidth: 0
borderColor: (Color r: 0.03 g: 0.02 b: 0.0)
backgroundMorph: nil
worldState: a WorldState
griddingOn: nil
HandMorph>>sendFocusEvent:to:clear:
Receiver: a HandMorph(843055104)
Arguments and temporary variables:
anEvent: [keystroke '<Cmd-d>']
focusHolder: a TextMorphForEditView(786432)
aBlock: [self keyboardFocus: nil]
w: a PasteUpMorph(425197568) [world]
result: #(nil)
Receiver's instance variables:
bounds: 435@557 corner: 451@573
owner: a PasteUpMorph(425197568) [world]
submorphs: #()
fullBounds: 435@557 corner: 451@573
color: Color blue
extension: a MorphExtension (141295616) [eventHandler = an EventHandler]
mouseFocus: nil
keyboardFocus: nil
eventListeners: nil
mouseListeners: nil
keyboardListeners: nil
mouseClickState: nil
mouseOverHandler: a MouseOverHandler
lastMouseEvent: [438@556 435@557 mouseMove 41062 nil]
targetOffset: 93@0
damageRecorder: a DamageRecorder
cacheCanvas: nil
cachedCanvasHasHoles: false
temporaryCursor: nil
temporaryCursorOffset: nil
hardwareCursor: nil
hasChanged: true
savedPatch: nil
userInitials: ''
lastEventBuffer: #(1 41062 437 557 0 0 0 1)
lastKeyScanCode: 36
combinedChar: nil
HandMorph>>sendEvent:focus:clear:
Receiver: a HandMorph(843055104)
Arguments and temporary variables:
anEvent: [keystroke '<Cmd-d>']
focusHolder: a TextMorphForEditView(786432)
aBlock: [self keyboardFocus: nil]
result: nil
Receiver's instance variables:
bounds: 435@557 corner: 451@573
owner: a PasteUpMorph(425197568) [world]
submorphs: #()
fullBounds: 435@557 corner: 451@573
color: Color blue
extension: a MorphExtension (141295616) [eventHandler = an EventHandler]
mouseFocus: nil
keyboardFocus: nil
eventListeners: nil
mouseListeners: nil
keyboardListeners: nil
mouseClickState: nil
mouseOverHandler: a MouseOverHandler
lastMouseEvent: [438@556 435@557 mouseMove 41062 nil]
targetOffset: 93@0
damageRecorder: a DamageRecorder
cacheCanvas: nil
cachedCanvasHasHoles: false
temporaryCursor: nil
temporaryCursorOffset: nil
hardwareCursor: nil
hasChanged: true
savedPatch: nil
userInitials: ''
lastEventBuffer: #(1 41062 437 557 0 0 0 1)
lastKeyScanCode: 36
combinedChar: nil
HandMorph>>sendKeyboardEvent:
Receiver: a HandMorph(843055104)
Arguments and temporary variables:
anEvent: [keystroke '<Cmd-d>']
Receiver's instance variables:
bounds: 435@557 corner: 451@573
owner: a PasteUpMorph(425197568) [world]
submorphs: #()
fullBounds: 435@557 corner: 451@573
color: Color blue
extension: a MorphExtension (141295616) [eventHandler = an EventHandler]
mouseFocus: nil
keyboardFocus: nil
eventListeners: nil
mouseListeners: nil
keyboardListeners: nil
mouseClickState: nil
mouseOverHandler: a MouseOverHandler
lastMouseEvent: [438@556 435@557 mouseMove 41062 nil]
targetOffset: 93@0
damageRecorder: a DamageRecorder
cacheCanvas: nil
cachedCanvasHasHoles: false
temporaryCursor: nil
temporaryCursorOffset: nil
hardwareCursor: nil
hasChanged: true
savedPatch: nil
userInitials: ''
lastEventBuffer: #(1 41062 437 557 0 0 0 1)
lastKeyScanCode: 36
combinedChar: nil
HandMorph>>handleEvent:
Receiver: a HandMorph(843055104)
Arguments and temporary variables:
anEvent: [keystroke '<Cmd-d>']
evt: [keystroke '<Cmd-d>']
ofs: nil
Receiver's instance variables:
bounds: 435@557 corner: 451@573
owner: a PasteUpMorph(425197568) [world]
submorphs: #()
fullBounds: 435@557 corner: 451@573
color: Color blue
extension: a MorphExtension (141295616) [eventHandler = an EventHandler]
mouseFocus: nil
keyboardFocus: nil
eventListeners: nil
mouseListeners: nil
keyboardListeners: nil
mouseClickState: nil
mouseOverHandler: a MouseOverHandler
lastMouseEvent: [438@556 435@557 mouseMove 41062 nil]
targetOffset: 93@0
damageRecorder: a DamageRecorder
cacheCanvas: nil
cachedCanvasHasHoles: false
temporaryCursor: nil
temporaryCursorOffset: nil
hardwareCursor: nil
hasChanged: true
savedPatch: nil
userInitials: ''
lastEventBuffer: #(1 41062 437 557 0 0 0 1)
lastKeyScanCode: 36
combinedChar: nil
HandMorph>>processEvents
Receiver: a HandMorph(843055104)
Arguments and temporary variables:
evt: [keystroke '<Cmd-d>']
evtBuf: #(2 12927 100 0 8 100 0 1)
type: 2
hadAny: true
Receiver's instance variables:
bounds: 435@557 corner: 451@573
owner: a PasteUpMorph(425197568) [world]
submorphs: #()
fullBounds: 435@557 corner: 451@573
color: Color blue
extension: a MorphExtension (141295616) [eventHandler = an EventHandler]
mouseFocus: nil
keyboardFocus: nil
eventListeners: nil
mouseListeners: nil
keyboardListeners: nil
mouseClickState: nil
mouseOverHandler: a MouseOverHandler
lastMouseEvent: [438@556 435@557 mouseMove 41062 nil]
targetOffset: 93@0
damageRecorder: a DamageRecorder
cacheCanvas: nil
cachedCanvasHasHoles: false
temporaryCursor: nil
temporaryCursorOffset: nil
hardwareCursor: nil
hasChanged: true
savedPatch: nil
userInitials: ''
lastEventBuffer: #(1 41062 437 557 0 0 0 1)
lastKeyScanCode: 36
combinedChar: nil
--- The full stack ---
ByteString class(Object)>>error:
ByteString class(Object)>>primitiveFailed:
ByteString class(Object)>>primitiveFailed
ByteString class(Behavior)>>basicNew:
ByteString class(String class)>>new:
ByteString(SequenceableCollection)>>copyFrom:to:
Text>>copyFrom:to:
SmalltalkEditor(TextEditor)>>selection
Compiler>>evaluate:in:to:notifying:ifFail:logged:
[rcvr class evaluatorClass new
evaluate: self selectionForDoitAsStream
in: ctxt
to: rcvr
notifying: self
ifFail: [FakeClassPool adopt: nil.
^ #failedDoit]
logged: true] in SmalltalkEditor>>evaluateSelection
BlockClosure>>on:do:
SmalltalkEditor>>evaluateSelection
SmalltalkEditor>>doIt
SmalltalkEditor>>doIt:
SmalltalkEditor(TextEditor)>>dispatchOn:
SmalltalkEditor(TextEditor)>>processKeyStroke:
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:
ECToolSet class>>codeCompletionAround:textMorph:keyStroke:
DEVToolSet class>>codeCompletionAround:textMorph:keyStroke:
ToolSet class>>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 Project class>>spawnNewProcess
[self value.
Processor terminateActive] in BlockClosure>>newProcess
Jan. 31, 2011
Jan. 31, 2011
[Pharo-project] [update 1.2] #12328
by Stéphane Ducasse
12328
-----
- Issue 3626: Clipboard broken on Unix
Stef
Jan. 31, 2011
Re: [Pharo-project] Issue 3539 in pharo: SettingBrowser class comment is out of date
by pharo@googlecode.com
Updates:
Status: Fixed
Comment #3 on issue 3539 by stephane...(a)gmail.com: SettingBrowser class
comment is out of date
http://code.google.com/p/pharo/issues/detail?id=3539
(No comment was entered for this change.)
Jan. 31, 2011
Re: [Pharo-project] Issue 3626 in pharo: Clipboard broken on Unix
by pharo@googlecode.com
Updates:
Status: Closed
Comment #3 on issue 3626 by stephane...(a)gmail.com: Clipboard broken on Unix
http://code.google.com/p/pharo/issues/detail?id=3626
in 12328
Jan. 31, 2011
Re: [Pharo-project] Issue 3626 in pharo: Clipboard broken on Unix
by pharo@googlecode.com
Comment #2 on issue 3626 by ryd...(a)gmail.com: Clipboard broken on Unix
http://code.google.com/p/pharo/issues/detail?id=3626
whooops... *blush*
Jan. 31, 2011
Re: [Pharo-project] [ANN] Alien on Pharo 1.2
by Stéphane Ducasse
On Jan 31, 2011, at 1:50 PM, Luc Fabresse wrote:
>
>
> 2011/1/31 Marcus Denker <marcus.denker(a)inria.fr>
> Do we set up a build server for it?
>
>
> My feeling is that nobody really maintain or improve it. Am I wrong? anybody there?
> or there is very low activity.
> So, I would say no.
So I would say yes!
> And I still hope for a better (threading, callbacks, ...) and more portable FFI library.
> Eliot spoke about that a while ago.
yes but first we have alien.
Jan. 31, 2011
[Pharo-project] [update 1.3] #13032
by Stéphane Ducasse
13032
-----
- Issue 3482: InterimSoundMorph references to SketchMorph.
- Issue 3624: LeftOver of Smalltalk and SystemDictionary.
Jan. 31, 2011