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

Re: [Pharo-project] Convention to build cmd-line interfaces with Pharo?

by Stefan Marr

On 15 May 2011, at 11:13, Stefan Marr wrote: > So, are there other ways to get to a clean command-line interface? Just notice that there is actually a preference 'readDocumentAtStartup' in Squeak, and in Pharo there is AbstractLauncher>>readDocumentAtStartup:. That will probably work. What is the best approach to support both of these different ways to disable this behavior? Thanks Stefan -- Stefan Marr Software Languages Lab Vrije Universiteit Brussel Pleinlaan 2 / B-1050 Brussels / Belgium http://soft.vub.ac.be/~smarr Phone: +32 2 629 2974 Fax: +32 2 629 3525

May 15, 2011

[Pharo-project] Convention to build cmd-line interfaces with Pharo?

by Stefan Marr

Hi: Is there any convention/standard approach to build nice cmd-line interfaces with Pharo? The first road block I encountered is the assumption that the first argument to the image on the command line is a document/script. Which fires an exception if it is not actually a loadable document. I did not see any way to disable that other than to deinstall Autostart (Autostart>>deinstall). That is fine for me, but might have unintended consequences. The ProjectLauncher>>startUpAfterLogin is the actual place where that assumption is hard coded. And, well, I don't know what the consequences are of disabling Autostart and as a consequence ProjectLauncher. So, are there other ways to get to a clean command-line interface? What I want eventually is the following: $ squeak-vm.sh Pharo-1.2.image --help SMark Benchmark Framework, version: SMark-StefanMarr.12 Usage: <vm+image> SMarkHarness [runner] [reporter] <suiteOrBenchmark> [iterations [processes [problemSize]]] Arguments: runner optional, a SMarkRunner class that executes the benchmarks reporter optional, a SMarkReporter class that processes and displays the results suiteOrBenchmark required, either a SMarkSuite with benchmarks, or a benchmark denoted by Suite.benchName iterations optional, number of times the benchmarks are repeated processes optional, number of processes/threads used by the benchmarks problemSize optional, depending on benchmark for instance number of inner iterations or size of used data set Bye the way, Squeak 4.1 exhibits the same behavior, but I did not notice anything alike in our 3.9 image, there is works just fine. Best regards Stefan -- Stefan Marr Software Languages Lab Vrije Universiteit Brussel Pleinlaan 2 / B-1050 Brussels / Belgium http://soft.vub.ac.be/~smarr Phone: +32 2 629 2974 Fax: +32 2 629 3525

May 15, 2011

[Pharo-project] [update 1.2] #12353

by Marcus Denker

12353 ----- Issue 3732: Change #standardWindowExtent Was: default omni browser size bigger - do #releaseClean - set version to 1.2.2 -- Marcus Denker -- http://www.marcusdenker.de INRIA Lille -- Nord Europe. Team RMoD.

May 15, 2011

Re: [Pharo-project] Which mailing-list for issues ?

by StÃ©phane Ducasse

sorry what do you want to say? On May 15, 2011, at 8:55 AM, laurent laffont wrote: > I'm still not subscribed, I want to, but it's not in http://www.pharo-project.org/community nor http://www.pharo-project.org/community/issue-tracking > > Laurent.

May 15, 2011

Re: [Pharo-project] [Pharo-users] Need someone to lead Fix of the Day contest [WAS] Re: Need help with 1.3 Full Image

by StÃ©phane Ducasse

On May 15, 2011, at 8:07 AM, laurent laffont wrote: > Another idea is to have the issues list sorted by id desc (most recent on top) instead of older ones on top. yes but no idea how to do that. > > Laurent. > > On Sat, May 14, 2011 at 10:04 PM, Mariano Martinez Peck <marianopeck(a)gmail.com> wrote: > > > On Sat, May 14, 2011 at 8:53 PM, Pat Maddox <patmaddox(a)me.com> wrote: > On May 14, 2011, at 9:53 AM, laurent laffont wrote: > >> On Sat, May 14, 2011 at 6:30 PM, Mariano Martinez Peck <marianopeck(a)gmail.com> wrote: >> >> >> I try to solve some issue in the issues tracker from time to time, but >> it's often difficult >> when outside your expertise. So doing it with others might definitively help. >> >> >> Fix of the day contest has the advantage of being compatible with every people timezone / agenda. >> >> We can also synchronize CODTC and FOTDC in order to comment classes related to the fix. >> >> Now we just need someone to lead the FOTDC. I already do COTDC so is there a good soul ? >> >> >> well, I've started by renaming the thread and attaching Pharo-users. >> >> Laurent, maybe you should clarify what "lead" exactly means. >> >> >> Everyday: >> - choose an issue for the contest >> - write it to the mailing list >> - push to ask help >> - contest is done when a slice is put in inbox >> >> >> Indeed, much like COTDC is. >> >> Laurent. > > That would be awesome! I was looking at the bug tracker (http://code.google.com/p/pharo/issues/list#) yesterday to see if there were things that I could help with...but even when looking at "open" issues, many of them are several years old, and have a state of "Accepted." So as someone not actively involved in pharo development, I have absolutely no clue what actually needs to be fixed. > > I'd like to help, the bug tracker doesn't give me much guidance (or at least I'd benefit from an explanation of how it's structured), and so guidance from someone who's active would be really helpful. > > > You can also check those tagged as milestone 1.3 which means that they "should" be more or less new. > http://code.google.com/p/pharo/issues/list?can=2&q=Milestone%3D1.3+&colspec… > > cheers > > > -- > Mariano > http://marianopeck.wordpress.com > >

May 15, 2011

Re: [Pharo-project] PBE in HTML [was: Popularity of Smalltalk in Software Industry]

by StÃ©phane Ducasse

I thought about the same stef On May 15, 2011, at 8:05 AM, laurent laffont wrote: > On Sat, May 14, 2011 at 10:33 PM, StÃ©phane Ducasse <stephane.ducasse(a)inria.fr> wrote: > > On May 14, 2011, at 9:58 PM, laurent laffont wrote: > > > On Sat, May 14, 2011 at 9:39 PM, StÃ©phane Ducasse <stephane.ducasse(a)inria.fr> wrote: > > I hosted it on the gforge. > > Now we can also put it in github. I would prefer to not maintain several versions. > > Laurent how many links did you have to fix? > > > > - htlatex output dir doesn't work, so I had to move manually *html and *png to a build dir (indeed, I wrote a bash script for that). > > - I've resized the pharo.png icon and create the creative commons one from the .pdf > > - PBE1.html: there was some mess at the end of the table of content, I've removed it > > - add a max-width for figures in the css > > - next link was missing in almost all chapters, previous link wrong in 4 or 5 chapters. > > argh! > > > > > Ideally we should have a script which do all this stuff so we can always generate from the last version. This is possible, I may look at it for PBE2 :) > > Thanks! > > I was just thinking that it may be a good use case for Coral .... who knows it well ? > > Laurent. > > > > > > > > > Laurent. > > > > > > Stef > > > > >

May 15, 2011

[Pharo-project] Which mailing-list for issues ?

by laurent laffont

I'm still not subscribed, I want to, but it's not in http://www.pharo-project.org/community nor http://www.pharo-project.org/community/issue-tracking Laurent.

May 15, 2011

Re: [Pharo-project] [Pharo-users] Need someone to lead Fix of the Day contest [WAS] Re: Need help with 1.3 Full Image

by laurent laffont

Another idea is to have the issues list sorted by id desc (most recent on top) instead of older ones on top. Laurent. On Sat, May 14, 2011 at 10:04 PM, Mariano Martinez Peck < marianopeck(a)gmail.com> wrote: > > > On Sat, May 14, 2011 at 8:53 PM, Pat Maddox <patmaddox(a)me.com> wrote: > >> On May 14, 2011, at 9:53 AM, laurent laffont wrote: >> >> On Sat, May 14, 2011 at 6:30 PM, Mariano Martinez Peck < >> marianopeck(a)gmail.com> wrote: >> >>> >>> >>>>> I try to solve some issue in the issues tracker from time to time, but >>>>> it's often difficult >>>>> when outside your expertise. So doing it with others might definitively >>>>> help. >>>>> >>>> >>>> >>>> Fix of the day contest has the advantage of being compatible with every >>>> people timezone / agenda. >>>> >>>> We can also synchronize CODTC and FOTDC in order to comment classes >>>> related to the fix. >>>> >>>> Now we just need someone to lead the FOTDC. I already do COTDC so is >>>> there a good soul ? >>>> >>>> >>> well, I've started by renaming the thread and attaching Pharo-users. >>> >>> Laurent, maybe you should clarify what "lead" exactly means. >>> >> >> >> Everyday: >> - choose an issue for the contest >> - write it to the mailing list >> - push to ask help >> - contest is done when a slice is put in inbox >> >> >> Indeed, much like COTDC is. >> >> Laurent. >> >> >> That would be awesome! I was looking at the bug tracker ( >> http://code.google.com/p/pharo/issues/list#) yesterday to see if there >> were things that I could help with...but even when looking at "open" issues, >> many of them are several years old, and have a state of "Accepted." So as >> someone not actively involved in pharo development, I have absolutely no >> clue what actually needs to be fixed. >> >> I'd like to help, the bug tracker doesn't give me much guidance (or at >> least I'd benefit from an explanation of how it's structured), and so >> guidance from someone who's active would be really helpful. >> > > > You can also check those tagged as milestone 1.3 which means that they > "should" be more or less new. > > http://code.google.com/p/pharo/issues/list?can=2&q=Milestone%3D1.3+&colspec… > > cheers > > > -- > Mariano > http://marianopeck.wordpress.com > >

May 15, 2011

Re: [Pharo-project] PBE in HTML [was: Popularity of Smalltalk in Software Industry]

by laurent laffont

On Sat, May 14, 2011 at 10:33 PM, StÃ©phane Ducasse < stephane.ducasse(a)inria.fr> wrote: > > On May 14, 2011, at 9:58 PM, laurent laffont wrote: > > > On Sat, May 14, 2011 at 9:39 PM, StÃ©phane Ducasse < > stephane.ducasse(a)inria.fr> wrote: > > I hosted it on the gforge. > > Now we can also put it in github. I would prefer to not maintain several > versions. > > Laurent how many links did you have to fix? > > > > - htlatex output dir doesn't work, so I had to move manually *html and > *png to a build dir (indeed, I wrote a bash script for that). > > - I've resized the pharo.png icon and create the creative commons one > from the .pdf > > - PBE1.html: there was some mess at the end of the table of content, I've > removed it > > - add a max-width for figures in the css > > - next link was missing in almost all chapters, previous link wrong in 4 > or 5 chapters. > > argh! > > > > > Ideally we should have a script which do all this stuff so we can always > generate from the last version. This is possible, I may look at it for PBE2 > :) > > Thanks! > I was just thinking that it may be a good use case for Coral .... who knows it well ? Laurent. > > > > > Laurent. > > > > > > Stef > > > > >

May 15, 2011

Re: [Pharo-project] Problem in OBCmdCreateCategory (and probably Rename...)

by Friedrich Dominicus

Lukas Renggli <renggli(a)gmail.com> writes: > I cannot reproduce the problem. What image are you using? Is Smalltalk vmVersion the right way to find it out? 'Croquet Closure Cog VM [CoInterpreter VMMaker-oscog.35]' This is the full backtrace as if I tried to send a bug-report regards Friedrich Subject: [BUG]Set(Object)>>doesNotUnderstand: #sorted here insert explanation of what you were doing, suspect changes you've made and so forth. 15 May 2011 7:47:02 am VM: unix - i686 - linux-gnu - Croquet Closure Cog VM [CoInterpreter VMMaker-oscog.35] Image: Pharo1.2.1a [Latest update: #12343] SecurityManager state: Restricted: false FileAccess: true SocketAccess: true Working Dir /home/frido/Smalltalks/AidaOneClickPharo1.2.app/Contents/Resources Trusted Dir /home/frido/Smalltalks/AidaOneClickPharo1.2.app/Contents/Resources/secure Untrusted Dir /home/frido/Smalltalks/AidaOneClickPharo1.2.app/Contents/Resources/My Squeak Set(Object)>>doesNotUnderstand: #sorted Receiver: a Set('*dynamicdeadcodefinder' '*metacello-base' '*graphics-tests' '*network-mime' '*polym...etc... Arguments and temporary variables: aMessage: sorted exception: MessageNotUnderstood: Set>>sorted resumeValue: nil Receiver's instance variables: tally: 383 array: #('*dynamicdeadcodefinder' nil nil nil nil '*metacello-base' '*graphics-...etc... OBCmdCreateMethodCategory(OBCmdCreateCategory)>>execute Receiver: an OBCmdCreateMethodCategory Arguments and temporary variables: categories: nil category: nil before: nil Receiver's instance variables: target: OBClassNode<OBCmdCreateMethodCategoryTest> requestor: an OBColumn(-- all --) OBCmdCreateMethodCategory(OBCommand)>>perform:orSendTo: Receiver: an OBCmdCreateMethodCategory Arguments and temporary variables: aSelector: #execute anObject: an OBPluggableListMorph(38010880) Receiver's instance variables: target: OBClassNode<OBCmdCreateMethodCategoryTest> requestor: an OBColumn(-- all --) [| selArgCount | (selArgCount := selector numArgs) = 0 ifTrue: [target perform: selector] ifFalse: [selArgCount = arguments size ifTrue: [target perform: selector withArguments: arguments] ifFalse: [target perform: selector withArguments: (arguments copyWith: evt)]]] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Receiver: a ToggleMenuItemMorph(295174144)'Add category...' Arguments and temporary variables: evt: [844@255 mouseUp 182264 nil] selArgCount: 2 Receiver's instance variables: bounds: 810@241 corner: 1007@259 owner: a MenuMorph(1043333120) submorphs: #() fullBounds: 810@241 corner: 1007@259 color: Color black extension: a MorphExtension (297795584) font: a StrikeFont(Bitmap DejaVu Sans 9 14) emphasis: 0 contents: 'Add category...' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: an OBCmdCreateMethodCategory selector: #perform:orSendTo: arguments: an Array(#execute an OBPluggableListMorph(38010880)) icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil BlockClosure>>ensure: Receiver: [| selArgCount | (selArgCount := selector numArgs) = 0 ifTrue: [target perform: selector...etc... Arguments and temporary variables: aBlock: [oldcursor show] complete: nil returnValue: nil Receiver's instance variables: outerContext: ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: startpc: 132 numArgs: 0 CursorWithMask(Cursor)>>showWhile: Receiver: ((CursorWithMask extent: 16@16 depth: 1 fromArray: #( 2r0 2r10000000000000000000000...etc... Arguments and temporary variables: aBlock: [| selArgCount | (selArgCount := selector numArgs) = 0 ifTrue: [targe...etc... oldcursor: ((CursorWithMask extent: 16@16 depth: 1 fromArray: #( 2r0 2r1...etc... Receiver's instance variables: bits: a Bitmap of length 16 width: 16 height: 16 depth: 1 offset: -1@ -1 maskForm: Form(16x16x1) ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Receiver: a ToggleMenuItemMorph(295174144)'Add category...' Arguments and temporary variables: evt: [844@255 mouseUp 182264 nil] w: a PasteUpMorph(425197568) [world] Receiver's instance variables: bounds: 810@241 corner: 1007@259 owner: a MenuMorph(1043333120) submorphs: #() fullBounds: 810@241 corner: 1007@259 color: Color black extension: a MorphExtension (297795584) font: a StrikeFont(Bitmap DejaVu Sans 9 14) emphasis: 0 contents: 'Add category...' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: an OBCmdCreateMethodCategory selector: #perform:orSendTo: arguments: an Array(#execute an OBPluggableListMorph(38010880)) icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil ToggleMenuItemMorph(MenuItemMorph)>>mouseUp: Receiver: a ToggleMenuItemMorph(295174144)'Add category...' Arguments and temporary variables: evt: [844@255 mouseUp 182264 nil] Receiver's instance variables: bounds: 810@241 corner: 1007@259 owner: a MenuMorph(1043333120) submorphs: #() fullBounds: 810@241 corner: 1007@259 color: Color black extension: a MorphExtension (297795584) font: a StrikeFont(Bitmap DejaVu Sans 9 14) emphasis: 0 contents: 'Add category...' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: an OBCmdCreateMethodCategory selector: #perform:orSendTo: arguments: an Array(#execute an OBPluggableListMorph(38010880)) icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp: Receiver: a ToggleMenuItemMorph(295174144)'Add category...' Arguments and temporary variables: anEvent: [844@255 mouseUp 182264 nil] Receiver's instance variables: bounds: 810@241 corner: 1007@259 owner: a MenuMorph(1043333120) submorphs: #() fullBounds: 810@241 corner: 1007@259 color: Color black extension: a MorphExtension (297795584) font: a StrikeFont(Bitmap DejaVu Sans 9 14) emphasis: 0 contents: 'Add category...' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: an OBCmdCreateMethodCategory selector: #perform:orSendTo: arguments: an Array(#execute an OBPluggableListMorph(38010880)) icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil MouseButtonEvent>>sentTo: Receiver: [844@255 mouseUp 182264 nil] Arguments and temporary variables: anObject: a ToggleMenuItemMorph(295174144)'Add category...' Receiver's instance variables: timeStamp: 182264 source: a HandMorph(843055104) windowIndex: nil type: #mouseUp buttons: 0 position: 844@255 handler: nil wasHandled: true whichButton: 4 ToggleMenuItemMorph(Morph)>>handleEvent: Receiver: a ToggleMenuItemMorph(295174144)'Add category...' Arguments and temporary variables: anEvent: [844@255 mouseUp 182264 nil] Receiver's instance variables: bounds: 810@241 corner: 1007@259 owner: a MenuMorph(1043333120) submorphs: #() fullBounds: 810@241 corner: 1007@259 color: Color black extension: a MorphExtension (297795584) font: a StrikeFont(Bitmap DejaVu Sans 9 14) emphasis: 0 contents: 'Add category...' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: an OBCmdCreateMethodCategory selector: #perform:orSendTo: arguments: an Array(#execute an OBPluggableListMorph(38010880)) icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil MorphicEventDispatcher>>dispatchDefault:with: Receiver: a MorphicEventDispatcher Arguments and temporary variables: anEvent: [844@255 mouseUp 182264 nil] aMorph: a ToggleMenuItemMorph(295174144)'Add category...' localEvt: nil index: 1 child: nil morphs: #() inside: true Receiver's instance variables: lastType: #mouseUp lastDispatch: #dispatchDefault:with: MorphicEventDispatcher>>dispatchEvent:with: Receiver: a MorphicEventDispatcher Arguments and temporary variables: anEvent: [844@255 mouseUp 182264 nil] aMorph: a ToggleMenuItemMorph(295174144)'Add category...' Receiver's instance variables: lastType: #mouseUp lastDispatch: #dispatchDefault:with: ToggleMenuItemMorph(Morph)>>processEvent:using: Receiver: a ToggleMenuItemMorph(295174144)'Add category...' Arguments and temporary variables: anEvent: [844@255 mouseUp 182264 nil] defaultDispatcher: a MorphicEventDispatcher Receiver's instance variables: bounds: 810@241 corner: 1007@259 owner: a MenuMorph(1043333120) submorphs: #() fullBounds: 810@241 corner: 1007@259 color: Color black extension: a MorphExtension (297795584) font: a StrikeFont(Bitmap DejaVu Sans 9 14) emphasis: 0 contents: 'Add category...' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: an OBCmdCreateMethodCategory selector: #perform:orSendTo: arguments: an Array(#execute an OBPluggableListMorph(38010880)) icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil MorphicEventDispatcher>>dispatchDefault:with: Receiver: a MorphicEventDispatcher Arguments and temporary variables: anEvent: [844@255 mouseUp 182264 nil] aMorph: a MenuMorph(1043333120) localEvt: [844@255 mouseUp 182264 nil] index: 1 child: a ToggleMenuItemMorph(295174144)'Add category...' morphs: an Array(a ToggleMenuItemMorph(295174144)'Add category...' a ToggleMenu...etc... inside: false Receiver's instance variables: lastType: #mouseUp lastDispatch: #dispatchDefault:with: MorphicEventDispatcher>>dispatchEvent:with: Receiver: a MorphicEventDispatcher Arguments and temporary variables: anEvent: [844@255 mouseUp 182264 nil] aMorph: a MenuMorph(1043333120) Receiver's instance variables: lastType: #mouseUp lastDispatch: #dispatchDefault:with: MenuMorph(Morph)>>processEvent:using: Receiver: a MenuMorph(1043333120) Arguments and temporary variables: anEvent: [844@255 mouseUp 182264 nil] defaultDispatcher: a MorphicEventDispatcher Receiver's instance variables: bounds: 805@236 corner: 1012@535 owner: nil submorphs: an Array(a ToggleMenuItemMorph(295174144)'Add category...' a ToggleM...etc... fullBounds: 805@236 corner: 1012@535 color: (Color r: 0.848 g: 0.848 b: 0.848) extension: a MorphExtension (1047003136) [other: (basicColor -> (Color r: 0.74...etc... borderWidth: 2 borderColor: (Color r: 0.595 g: 0.595 b: 0.595) defaultTarget: an OBColumn(-- all --) selectedItem: a ToggleMenuItemMorph(295174144)'Add category...' stayUp: false popUpOwner: nil activeSubMenu: nil activatorDockingBar: nil embeddable: nil menuItems: an OrderedCollection(a ToggleMenuItemMorph(295174144)'Add category.....etc... MenuMorph(Morph)>>processEvent: Receiver: a MenuMorph(1043333120) Arguments and temporary variables: anEvent: [844@255 mouseUp 182264 nil] Receiver's instance variables: bounds: 805@236 corner: 1012@535 owner: nil submorphs: an Array(a ToggleMenuItemMorph(295174144)'Add category...' a ToggleM...etc... fullBounds: 805@236 corner: 1012@535 color: (Color r: 0.848 g: 0.848 b: 0.848) extension: a MorphExtension (1047003136) [other: (basicColor -> (Color r: 0.74...etc... borderWidth: 2 borderColor: (Color r: 0.595 g: 0.595 b: 0.595) defaultTarget: an OBColumn(-- all --) selectedItem: a ToggleMenuItemMorph(295174144)'Add category...' stayUp: false popUpOwner: nil activeSubMenu: nil activatorDockingBar: nil embeddable: nil menuItems: an OrderedCollection(a ToggleMenuItemMorph(295174144)'Add category.....etc... MenuMorph>>handleFocusEvent: Receiver: a MenuMorph(1043333120) Arguments and temporary variables: evt: [844@255 mouseUp 182264 nil] Receiver's instance variables: bounds: 805@236 corner: 1012@535 owner: nil submorphs: an Array(a ToggleMenuItemMorph(295174144)'Add category...' a ToggleM...etc... fullBounds: 805@236 corner: 1012@535 color: (Color r: 0.848 g: 0.848 b: 0.848) extension: a MorphExtension (1047003136) [other: (basicColor -> (Color r: 0.74...etc... borderWidth: 2 borderColor: (Color r: 0.595 g: 0.595 b: 0.595) defaultTarget: an OBColumn(-- all --) selectedItem: a ToggleMenuItemMorph(295174144)'Add category...' stayUp: false popUpOwner: nil activeSubMenu: nil activatorDockingBar: nil embeddable: nil menuItems: an OrderedCollection(a ToggleMenuItemMorph(295174144)'Add category.....etc... [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: [844@255 mouseUp 182264 nil] focusHolder: a MenuMorph(1043333120) result: #(nil) Receiver's instance variables: bounds: 828@636 corner: 844@652 owner: a PasteUpMorph(425197568) [world] submorphs: #() fullBounds: 828@636 corner: 844@652 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: [828@636 mouseUp 211592 nil] targetOffset: 16@11 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: true temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 211592 828 636 0 0 0 1) lastKeyScanCode: 101 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: 1344@1014 owner: nil submorphs: an Array(a TaskbarMorph(811335680) a SystemWindow(691011584) an OBSy...etc... fullBounds: 0@0 corner: 1344@1014 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: [844@255 mouseOver red nil nil] Receiver's instance variables: bounds: 0@0 corner: 1344@1014 owner: nil submorphs: an Array(a TaskbarMorph(811335680) a SystemWindow(691011584) an OBSy...etc... fullBounds: 0@0 corner: 1344@1014 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: [844@255 mouseUp 182264 nil] focusHolder: a MenuMorph(1043333120) aBlock: [self mouseFocus: nil] w: a PasteUpMorph(425197568) [world] result: #(nil) Receiver's instance variables: bounds: 828@636 corner: 844@652 owner: a PasteUpMorph(425197568) [world] submorphs: #() fullBounds: 828@636 corner: 844@652 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: [828@636 mouseUp 211592 nil] targetOffset: 16@11 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: true temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 211592 828 636 0 0 0 1) lastKeyScanCode: 101 combinedChar: nil HandMorph>>sendEvent:focus:clear: Receiver: a HandMorph(843055104) Arguments and temporary variables: anEvent: [844@255 mouseUp 182264 nil] focusHolder: a MenuMorph(1043333120) aBlock: [self mouseFocus: nil] result: nil Receiver's instance variables: bounds: 828@636 corner: 844@652 owner: a PasteUpMorph(425197568) [world] submorphs: #() fullBounds: 828@636 corner: 844@652 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: [828@636 mouseUp 211592 nil] targetOffset: 16@11 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: true temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 211592 828 636 0 0 0 1) lastKeyScanCode: 101 combinedChar: nil HandMorph>>sendMouseEvent: Receiver: a HandMorph(843055104) Arguments and temporary variables: anEvent: [844@255 mouseUp 182264 nil] Receiver's instance variables: bounds: 828@636 corner: 844@652 owner: a PasteUpMorph(425197568) [world] submorphs: #() fullBounds: 828@636 corner: 844@652 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: [828@636 mouseUp 211592 nil] targetOffset: 16@11 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: true temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 211592 828 636 0 0 0 1) lastKeyScanCode: 101 combinedChar: nil HandMorph>>handleEvent: Receiver: a HandMorph(843055104) Arguments and temporary variables: anEvent: [844@255 mouseUp 182264 nil] evt: [844@255 mouseUp 182264 nil] ofs: nil Receiver's instance variables: bounds: 828@636 corner: 844@652 owner: a PasteUpMorph(425197568) [world] submorphs: #() fullBounds: 828@636 corner: 844@652 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: [828@636 mouseUp 211592 nil] targetOffset: 16@11 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: true temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 211592 828 636 0 0 0 1) lastKeyScanCode: 101 combinedChar: nil HandMorph>>processEvents Receiver: a HandMorph(843055104) Arguments and temporary variables: evt: [844@255 mouseUp 182264 nil] evtBuf: #(1 182264 844 255 0 0 0 1) type: 1 hadAny: false Receiver's instance variables: bounds: 828@636 corner: 844@652 owner: a PasteUpMorph(425197568) [world] submorphs: #() fullBounds: 828@636 corner: 844@652 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: [828@636 mouseUp 211592 nil] targetOffset: 16@11 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: true temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 211592 828 636 0 0 0 1) lastKeyScanCode: 101 combinedChar: nil [:h | ActiveHand := h. h processEvents. ActiveHand := nil] in WorldState>>doOneCycleNowFor: Receiver: a WorldState Arguments and temporary variables: h: a HandMorph(843055104) Receiver's instance variables: hands: an Array(a HandMorph(843055104)) viewBox: 0@0 corner: 1344@1014 canvas: a FormCanvas on: DisplayScreen(1344x1014x32) damageRecorder: a DamageRecorder stepList: a Heap(StepMessage(#stepAt: -> an OverflowRowMorph(348127232))(an Ove...etc... lastStepTime: 211628 lastStepMessage: nil lastCycleTime: 211612 alarms: a Heap() lastAlarmTime: 211628 menuBuilder: a PragmaMenuBuilder Array(SequenceableCollection)>>do: Receiver: an Array(a HandMorph(843055104)) Arguments and temporary variables: aBlock: [:h | ActiveHand := h. h processEvents. ActiveHand := nil] index: 1 indexLimiT: 1 Receiver's instance variables: an Array(a HandMorph(843055104)) WorldState>>handsDo: Receiver: a WorldState Arguments and temporary variables: aBlock: [:h | ActiveHand := h. h processEvents. ActiveHand := nil] Receiver's instance variables: hands: an Array(a HandMorph(843055104)) viewBox: 0@0 corner: 1344@1014 canvas: a FormCanvas on: DisplayScreen(1344x1014x32) damageRecorder: a DamageRecorder stepList: a Heap(StepMessage(#stepAt: -> an OverflowRowMorph(348127232))(an Ove...etc... lastStepTime: 211628 lastStepMessage: nil lastCycleTime: 211612 alarms: a Heap() lastAlarmTime: 211628 menuBuilder: a PragmaMenuBuilder WorldState>>doOneCycleNowFor: Receiver: a WorldState Arguments and temporary variables: aWorld: a PasteUpMorph(425197568) [world] Receiver's instance variables: hands: an Array(a HandMorph(843055104)) viewBox: 0@0 corner: 1344@1014 canvas: a FormCanvas on: DisplayScreen(1344x1014x32) damageRecorder: a DamageRecorder stepList: a Heap(StepMessage(#stepAt: -> an OverflowRowMorph(348127232))(an Ove...etc... lastStepTime: 211628 lastStepMessage: nil lastCycleTime: 211612 alarms: a Heap() lastAlarmTime: 211628 menuBuilder: a PragmaMenuBuilder WorldState>>doOneCycleFor: Receiver: a WorldState Arguments and temporary variables: aWorld: a PasteUpMorph(425197568) [world] Receiver's instance variables: hands: an Array(a HandMorph(843055104)) viewBox: 0@0 corner: 1344@1014 canvas: a FormCanvas on: DisplayScreen(1344x1014x32) damageRecorder: a DamageRecorder stepList: a Heap(StepMessage(#stepAt: -> an OverflowRowMorph(348127232))(an Ove...etc... lastStepTime: 211628 lastStepMessage: nil lastCycleTime: 211612 alarms: a Heap() lastAlarmTime: 211628 menuBuilder: a PragmaMenuBuilder PasteUpMorph>>doOneCycle Receiver: a PasteUpMorph(425197568) [world] Arguments and temporary variables: Receiver's instance variables: bounds: 0@0 corner: 1344@1014 owner: nil submorphs: an Array(a TaskbarMorph(811335680) a SystemWindow(691011584) an OBSy...etc... fullBounds: 0@0 corner: 1344@1014 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 [[World doOneCycle. Processor yield. false] whileFalse. nil] in Project class>>spawnNewProcess Receiver: Project Arguments and temporary variables: Receiver's instance variables: superclass: Model methodDict: a MethodDictionary(#beep->(Project>>#beep "a CompiledMethod(3997696...etc... format: 144 instanceVariables: #('world' 'changeSet' 'transcript' 'parentProject' 'displayD...etc... organization: ('*Polymorph-Widgets' createTaskbarIfNecessary moveCollapsedWindo...etc... subclasses: nil name: #Project classPool: a Dictionary(#AllProjects->an OrderedCollection(a Project) #CurrentP...etc... sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'System-Support' traitComposition: {} localSelectors: nil [self value. Processor terminateActive] in BlockClosure>>newProcess Receiver: [[World doOneCycle. Processor yield. false] whileFalse. nil] Arguments and temporary variables: Receiver's instance variables: outerContext: Project class>>spawnNewProcess startpc: 53 numArgs: 0 --- The full stack --- Set(Object)>>doesNotUnderstand: #sorted OBCmdCreateMethodCategory(OBCmdCreateCategory)>>execute OBCmdCreateMethodCategory(OBCommand)>>perform:orSendTo: [| selArgCount | (selArgCount := selector numArgs) = 0 ifTrue: [target perform: selector] ifFalse: [selArgCount = arguments size ifTrue: [target perform: selector withArguments: arguments] ifFalse: [target perform: selector withArguments: (arguments copyWith: evt)]]] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: BlockClosure>>ensure: CursorWithMask(Cursor)>>showWhile: ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: ToggleMenuItemMorph(MenuItemMorph)>>mouseUp: ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp: MouseButtonEvent>>sentTo: ToggleMenuItemMorph(Morph)>>handleEvent: MorphicEventDispatcher>>dispatchDefault:with: MorphicEventDispatcher>>dispatchEvent:with: ToggleMenuItemMorph(Morph)>>processEvent:using: MorphicEventDispatcher>>dispatchDefault:with: MorphicEventDispatcher>>dispatchEvent:with: MenuMorph(Morph)>>processEvent:using: MenuMorph(Morph)>>processEvent: MenuMorph>>handleFocusEvent: [ActiveHand := self. ActiveEvent := anEvent. result := focusHolder handleFocusEvent: (anEvent transformedBy: (focusHolder transformedFrom: self))] in HandMorph>>sendFocusEvent:to:clear: [aBlock value] in PasteUpMorph>>becomeActiveDuring: BlockClosure>>on:do: PasteUpMorph>>becomeActiveDuring: HandMorph>>sendFocusEvent:to:clear: HandMorph>>sendEvent:focus:clear: HandMorph>>sendMouseEvent: HandMorph>>handleEvent: HandMorph>>processEvents [:h | ActiveHand := h. h processEvents. ActiveHand := nil] in WorldState>>doOneCycleNowFor: Array(SequenceableCollection)>>do: WorldState>>handsDo: WorldState>>doOneCycleNowFor: WorldState>>doOneCycleFor: PasteUpMorph>>doOneCycle [[World doOneCycle. Processor yield. false] whileFalse. nil] in Project class>>spawnNewProcess [self value. Processor terminateActive] in BlockClosure>>newProcess -- Q-Software Solutions GmbH; Sitz: Bruchsal; Registergericht: Mannheim Registriernummer: HRB232138; Geschaeftsfuehrer: Friedrich Dominicus

May 15, 2011