- Pharo-dev - lists.pharo.org

[Pharo-project] Announcement support in SystemWindow
by Alexandre Bergel Aug. 25, 2009

Aug. 25, 2009

I produced a ChangeSet available on: http://code.google.com/p/pharo/issues/detail?id=806 This version is an improvement over the previous version (Morphic- Alexandre_Bergel.301). The .cs only contains the difference. Note that for the Mondrian users, the changeset is contained into the Mondrian distribution. Cheers, Alexandre -- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: Alexandre Bergel http://www.bergel.eu ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.

1 0

[Pharo-project] In pharo
by StÃ©phane Ducasse Aug. 25, 2009

Aug. 25, 2009

> > > Damien > > I will include simpleButton in Morph since it is defined in SoundUi > and this is not really its place. > Now in the next release of the pharo could you add the sound > packages (Sound + soundUI) and from MorphicExtras the Example and > Demo? > > Stef > > > >

1 0

[Pharo-project] Right click weirdness
by Schwab,Wilhelm K Aug. 25, 2009

Aug. 25, 2009

To anyone using both Windows and Linux, please try moving an image between the two environments. I started my programming today by copying an image from Linux to Windows. Once on the latter, I found that right clicking did not work; I had to use the mouse wheel to get context menus. Some time later, the right button started to work. Maybe saving the image on the current machine jolts it??? Bill

5 4

[Pharo-project] Networking on images running on 64 bit OSes.
by Miguel Enrique CobÃ¡ Martinez Aug. 25, 2009

Aug. 25, 2009

Is someone working on issues: http://code.google.com/p/pharo/issues/detail?id=1031 http://code.google.com/p/pharo/issues/detail?id=961 http://code.google.com/p/pharo/issues/detail?id=794 Without them fixed the in-image network doesn't work. CPU: intel CPU arch: x86 OS: Debian GNU/Linux i386 OS arch: 32 bits works: YES CPU: intel CPU arch: x86_64 OS: Debian GNU/Linux amd64 OS arch: 64 bits works: NO CPU: amd CPU arch: x86_64 OS: Debian GNU/Linux i386 OS arch: 32 bits works: YES CPU: amd CPU arch: x86_64 OS: Debian GNU/Linux amd64 OS arch: 64 bits works: NO In short it doesn't work on a 64 bit OS. I tried to see the source code for the squeak vm because it is the primitives that are failing but I got confused and gave up. The interesting part that I found was this: static char localHostName[MAXHOSTNAMELEN]; static u_long localHostAddress; /* GROSS IPv4 ASSUMPTION! */ assigned in: /* start a new network session */ sqInt sqNetworkInit(sqInt resolverSemaIndex) { if (0 != thisNetSession) return 0; /* already initialised */ gethostname(localHostName, MAXHOSTNAMELEN); localHostAddress= nameToAddr(localHostName); thisNetSession= clock() + time(0); if (0 == thisNetSession) thisNetSession= 1; /* 0 => uninitialised */ resolverSema= resolverSemaIndex; return 0; } by means of: static int nameToAddr(char *hostName) { struct hostent *he; lastError= 0; /* ditto */ if ((he= gethostbyname(hostName))) return ntohl(*(long *)(he->h_addr_list[0])); lastError= h_errno; /* and one more ditto */ return 0; } there it appears to call a system function (gethostbyname) and to convert the result struct first entry on array h_addr_list. Well the point is, this is for someone with more experience with the socket plugin in squeak. So, it is someone trying to fix this? Are there any news here? It is a structural problem, because before this I could connect to the network in my 64 bit OS on my x86_64 architecture without the ia32libs on debian. For these test I installed the ia32libs package of debian in order load and start the closure vm. Maybe Jose Luis Redrejo has a hint about how to build the vm in order to having a full networking vm/image. Or someone more involved with the internals of the vm. -- Miguel CobÃ¡ http://miguel.leugim.com.mx

1 2

[Pharo-project] Offscreen drawing...
by Lawson English Aug. 24, 2009

Aug. 24, 2009

Is there a way to render into an offscreen buffer where the actual host hardware's address is specified? I realize that at the level of implementing the hooks for the VM, this must be possible, but is it [easily] possible to redirect the memory space that Squeak renders to at runtime, rather than during creation of the VM? I'm trying to understand how one might use the shared memory space of Second LIfe's media plugin to be the drawing region of a regular Squeak Smalltalk workspace/drawing window. Being able to have fully active Smalltalk-on-a-prim in SL would rock, especially if you could have a choice of whether to work directly with the in-world rendering or with the normal Squeak window's rendering. The plugin can live in a separate process and communicate higher level events via sockets and share memory for rendering so its not necessary to have a fully standalone plugin. From the SL side, you could conceivably have a regular Squeak development environment with the added ability to use a specified hardware buffer instead/in addition to the regular Squeak window. Sorta like what seaside sorta does, but without the overhead of rendering via html. Lawson

2 2

[Pharo-project] VMMakerTool >>DoesNotUnderstand ModalFolderSelector
by jean baptiste arnaud Aug. 24, 2009

Aug. 24, 2009

Hi, I would like use VMMaker on Pharo. I resolve all dependency for the VMMaker Package : -FFI,(ScriptLoader loadFFI.) -Speech find in "Unstable Squeak" package from squeaksource -Finally i install VMMaker from squeaksource VMMaker seems work correctly but not this UI. When load the VMMakerTool, i have a error does not understand ModalFolderSelector. -- Arnaud Jean Baptiste

5 4

[Pharo-project] over bloated image workaround
by Mariano Martinez Peck Aug. 24, 2009

Aug. 24, 2009

Hi folks: Sometimes, my Pharo images grows a lot. Size like 80MB or similar. Marcelo Cortez gave me a couple of changes (fileouts) that make my images go back to their original size or similar. For example, it was tasted in a 87 MB and after this changes and this stuff, it become in 24 MB. The same with another one from 65M to 35M. If you have a big Pharo image, save a copy and do this tests: 1) File in all the changes I attach. 2) Go to a workspace and evaluate: OBDPAbstract reinitAllCache. LocalSends allInstances first initialize. EventManager resetMap. Smalltalk garbageCollect. Did this make your image too much smaller? When I evaluate SystemNavigation default obsoleteBehavio size I get a a number of 3 digits. Perhaps it is a matter with the OB. I guess it generates dependences while you are developing a class and it creates on the fly an obsolteClassXXX when there is something that doesn't exist. Then they are processes and they are never garbage collected. When SmalltalkImage tries to fix the obsoletes delegates to the literal frames of the compiled methods so that to search references to the obsoletes. But references were not gone because they weren't garbage collected. The same method finishes with error if the obsoletes > 0. Does anyone has a comment for this? I tried to do my best to write in English from what Marcelo told me and from what I can understand from the changesets. Best, Mariano

8 13

[Pharo-project] Recursion - should there be a limit?
by Schwab,Wilhelm K Aug. 23, 2009

Aug. 23, 2009

Hello all, I (stupidly) created a runaway recursion that happened to be in a Seaside app that uses LDAPLayer, and that is currently using drives shared over a pre-production vpn from a 64 bit Ubuntu system. Hopefully you won't think less of me for not immediately thinking of infinite recursion as the cause of the problems. It did what is IMHO the worst thing a program can do: it just stopped responding. It makes sense now, and the next time I see the IDE get sluggish and finally lock up, I will probably think of recursion before looking for strange causes. As it was, I simply moved breakpoints around (making liberal use of the End Process button on Ubuntu's system monitor) until I finally put one in front of something that I thought should have worked, and in fact was the culprit. For good or bad, Dolphin would promptly complain of the callstack being too deep, after which the mistake is fairly easy to find. I have never had problems with that limit, but IIRC others have. Would it be simple to add an optional limit on the stack depth? Would you do it, or would it be asking for trouble? Is there a less invasive way to aid in debugging this scenario? Bill

4 3

Re: [Pharo-project] [BUG]NewInspector(Object)>>doesNotUnderstand: #extent:
by Damien Cassou Aug. 23, 2009

Aug. 23, 2009

On Sun, Aug 23, 2009 at 11:41 AM, <roel.wuyts(a)gmail.com> wrote: > I opened a Pharo1.0-10418-BETAdev09.08.2 image, opened a class browser, > right-clicked the title bar of the System Browser, and selected Inspect. > An inspector opens (successfully), as well as a DNU that NewInsecptor > does not understand the message 'extent:'. > > Browsing around a bit shows that it expects that SystemBrowser expects > that it opens a morph and sends the 'etent:' message after opening the > inspector (note that it would be better to first resize before to avoid > redrawing and flickering). Hi Roel, http://code.google.com/p/pharo/issues/detail?id=1085 -- Damien Cassou http://damiencassou.seasidehosting.st "Lambdas are relegated to relative obscurity until Java makes them popular by not having them." James Iry

1 0

[Pharo-project] [BUG]NewInspector(Object)>>doesNotUnderstand: #extent:
by roel.wuyts＠gmail.com Aug. 23, 2009

Aug. 23, 2009

I opened a Pharo1.0-10418-BETAdev09.08.2 image, opened a class browser, right-clicked the title bar of the System Browser, and selected Inspect. An inspector opens (successfully), as well as a DNU that NewInsecptor does not understand the message 'extent:'. Browsing around a bit shows that it expects that SystemBrowser expects that it opens a morph and sends the 'etent:' message after opening the inspector (note that it would be better to first resize before to avoid redrawing and flickering). 23 August 2009 11:36:56 am VM: Mac OS - intel - 1058 - Squeak3.8.1 of '28 Aug 2006' [latest update: #6747] Squeak VM 4.2.1b1 Image: Pharo1.0beta [Latest update: #10418] SecurityManager state: Restricted: false FileAccess: true SocketAccess: true Working Dir /Users/rowuyts/Documents/Development/Pharo1 Trusted Dir /foobar/tooBar/forSqueak/bogus Untrusted Dir /Users/rowuyts/Library/Preferences/Squeak/Internet/My Squeak NewInspector(Object)>>doesNotUnderstand: #extent: Receiver: a NewInspector Arguments and temporary variables: aMessage: extent: 300@200 exception: MessageNotUnderstood: NewInspector>>extent: resumeValue: nil Receiver's instance variables: dependents: a DependentsArray(a PluggableSystemWindow(3989) a PluggableTreeMorp...etc... contents: '' selectedObject: a NIObjectNode roots: an OrderedCollection(a NIObjectNode) window: a PluggableSystemWindow(3989) showOnlyCurrentPath: false selectedObjectForPath: nil SystemWindow(Morph)>>inspectInMorphic: Receiver: a SystemWindow(316) Arguments and temporary variables: evt: [270@256 mouseUp 124582 nil] Receiver's instance variables: bounds: 9@44 corner: 713@515 owner: a PasteUpMorph(1622) [world] submorphs: an Array(a WindowEdgeGripMorph(3602) a WindowEdgeGripMorph(3160) a W...etc... fullBounds: 9@44 corner: 714@516 color: (Color r: 0.816 g: 0.812 b: 0.812) extension: a MorphExtension (756) [other: (layoutPolicy -> a ProportionalLayou...etc... borderWidth: 1 borderColor: Color lightGray model: an OBSystemBrowser slotName: nil open: false labelString: 'System Browser' stripes: an Array(a RectangleMorph(3370) a RectangleMorph(3816)) label: a LabelMorph(131)'System Browser' closeBox: a MultistateButtonMorph(1456) collapseBox: a MultistateButtonMorph(1402) activeOnlyOnTop: true paneMorphs: an Array(an OBGroupingMorph(1376) an OBGroupingMorph(60)) paneRects: nil collapsedFrame: nil fullFrame: 9@44 corner: 713@515 isCollapsed: false menuBox: an IconicButton(2697) mustNotClose: false labelWidgetAllowance: 98 updatablePanes: #() allowReframeHandles: true labelArea: an AlignmentMorph(556) expandBox: a MultistateButtonMorph(1563) SystemWindow(Morph)>>inspectAt:event: Receiver: a SystemWindow(316) Arguments and temporary variables: aPoint: 204@63 evt: [270@256 mouseUp 124582 nil] morphs: an Array(an AlignmentMorph(556) a SystemWindow(316)) target: a SystemWindow(316) Receiver's instance variables: bounds: 9@44 corner: 713@515 owner: a PasteUpMorph(1622) [world] submorphs: an Array(a WindowEdgeGripMorph(3602) a WindowEdgeGripMorph(3160) a W...etc... fullBounds: 9@44 corner: 714@516 color: (Color r: 0.816 g: 0.812 b: 0.812) extension: a MorphExtension (756) [other: (layoutPolicy -> a ProportionalLayou...etc... borderWidth: 1 borderColor: Color lightGray model: an OBSystemBrowser slotName: nil open: false labelString: 'System Browser' stripes: an Array(a RectangleMorph(3370) a RectangleMorph(3816)) label: a LabelMorph(131)'System Browser' closeBox: a MultistateButtonMorph(1456) collapseBox: a MultistateButtonMorph(1402) activeOnlyOnTop: true paneMorphs: an Array(an OBGroupingMorph(1376) an OBGroupingMorph(60)) paneRects: nil collapsedFrame: nil fullFrame: 9@44 corner: 713@515 isCollapsed: false menuBox: an IconicButton(2697) mustNotClose: false labelWidgetAllowance: 98 updatablePanes: #() allowReframeHandles: true labelArea: an AlignmentMorph(556) expandBox: a MultistateButtonMorph(1563) [] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Receiver: a ToggleMenuItemMorph(2793)'inspect' Arguments and temporary variables: <<error during printing> Receiver's instance variables: bounds: 206@251 corner: 364@269 owner: a MenuMorph(3977) submorphs: #() fullBounds: nil color: Color black extension: a MorphExtension (832) [other: (layoutProperties -> a LayoutPropert...etc... font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'inspect' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: a SystemWindow(316) selector: #inspectAt:event: arguments: {204@63} icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil BlockClosure>>ensure: Receiver: [closure] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: Arguments and temporary variables: aBlock: [closure] in CursorWithMask(Cursor)>>showWhile: returnValue: nil b: nil Receiver's instance variables: outerContext: ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: startpc: 136 numArgs: 0 CursorWithMask(Cursor)>>showWhile: Receiver: ((CursorWithMask extent: 16@16 depth: 1 fromArray: #( 2r0 2r10000000000000000000000...etc... Arguments and temporary variables: aBlock: [closure] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: 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(2793)'inspect' Arguments and temporary variables: evt: [270@256 mouseUp 124582 nil] w: a PasteUpMorph(1622) [world] selArgCount: #(2) Receiver's instance variables: bounds: 206@251 corner: 364@269 owner: a MenuMorph(3977) submorphs: #() fullBounds: nil color: Color black extension: a MorphExtension (832) [other: (layoutProperties -> a LayoutPropert...etc... font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'inspect' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: a SystemWindow(316) selector: #inspectAt:event: arguments: {204@63} icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil ToggleMenuItemMorph(MenuItemMorph)>>mouseUp: Receiver: a ToggleMenuItemMorph(2793)'inspect' Arguments and temporary variables: evt: [270@256 mouseUp 124582 nil] Receiver's instance variables: bounds: 206@251 corner: 364@269 owner: a MenuMorph(3977) submorphs: #() fullBounds: nil color: Color black extension: a MorphExtension (832) [other: (layoutProperties -> a LayoutPropert...etc... font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'inspect' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: a SystemWindow(316) selector: #inspectAt:event: arguments: {204@63} icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp: Receiver: a ToggleMenuItemMorph(2793)'inspect' Arguments and temporary variables: anEvent: [270@256 mouseUp 124582 nil] Receiver's instance variables: bounds: 206@251 corner: 364@269 owner: a MenuMorph(3977) submorphs: #() fullBounds: nil color: Color black extension: a MorphExtension (832) [other: (layoutProperties -> a LayoutPropert...etc... font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'inspect' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: a SystemWindow(316) selector: #inspectAt:event: arguments: {204@63} icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil MouseButtonEvent>>sentTo: Receiver: [270@256 mouseUp 124582 nil] Arguments and temporary variables: anObject: a ToggleMenuItemMorph(2793)'inspect' Receiver's instance variables: timeStamp: 124582 source: a HandMorph(3216) windowIndex: nil type: #mouseUp buttons: 0 position: 270@256 handler: nil wasHandled: true whichButton: 4 ToggleMenuItemMorph(Morph)>>handleEvent: Receiver: a ToggleMenuItemMorph(2793)'inspect' Arguments and temporary variables: anEvent: [270@256 mouseUp 124582 nil] Receiver's instance variables: bounds: 206@251 corner: 364@269 owner: a MenuMorph(3977) submorphs: #() fullBounds: nil color: Color black extension: a MorphExtension (832) [other: (layoutProperties -> a LayoutPropert...etc... font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'inspect' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: a SystemWindow(316) selector: #inspectAt:event: arguments: {204@63} icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil MorphicEventDispatcher>>dispatchDefault:with: Receiver: a MorphicEventDispatcher Arguments and temporary variables: anEvent: [270@256 mouseUp 124582 nil] aMorph: a ToggleMenuItemMorph(2793)'inspect' 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: [270@256 mouseUp 124582 nil] aMorph: a ToggleMenuItemMorph(2793)'inspect' Receiver's instance variables: lastType: #mouseUp lastDispatch: #dispatchDefault:with: ToggleMenuItemMorph(Morph)>>processEvent:using: Receiver: a ToggleMenuItemMorph(2793)'inspect' Arguments and temporary variables: anEvent: [270@256 mouseUp 124582 nil] defaultDispatcher: a MorphicEventDispatcher Receiver's instance variables: bounds: 206@251 corner: 364@269 owner: a MenuMorph(3977) submorphs: #() fullBounds: nil color: Color black extension: a MorphExtension (832) [other: (layoutProperties -> a LayoutPropert...etc... font: a LogicalFont familyName: DejaVu Sans emphasis: nil pointSize: 10 rea...etc... emphasis: 0 contents: 'inspect' hasFocus: false isEnabled: true subMenu: nil isSelected: false target: a SystemWindow(316) selector: #inspectAt:event: arguments: {204@63} icon: Form(16x16x32) getStateSelector: nil enablementSelector: nil keyText: nil MorphicEventDispatcher>>dispatchDefault:with: Receiver: a MorphicEventDispatcher Arguments and temporary variables: anEvent: [270@256 mouseUp 124582 nil] aMorph: a MenuMorph(3977) localEvt: [270@256 mouseUp 124582 nil] index: 20 child: a ToggleMenuItemMorph(2793)'inspect' morphs: an Array(an AlignmentMorph(187) a ToggleMenuItemMorph(2760)'grab' a Tog...etc... inside: false Receiver's instance variables: lastType: #mouseUp lastDispatch: #dispatchDefault:with: MorphicEventDispatcher>>dispatchEvent:with: Receiver: a MorphicEventDispatcher Arguments and temporary variables: anEvent: [270@256 mouseUp 124582 nil] aMorph: a MenuMorph(3977) Receiver's instance variables: lastType: #mouseUp lastDispatch: #dispatchDefault:with: MenuMorph(Morph)>>processEvent:using: Receiver: a MenuMorph(3977) Arguments and temporary variables: anEvent: [270@256 mouseUp 124582 nil] defaultDispatcher: a MorphicEventDispatcher Receiver's instance variables: bounds: 202@33 corner: 368@399 owner: nil submorphs: an Array(an AlignmentMorph(187) a ToggleMenuItemMorph(2760)'grab' a ...etc... fullBounds: nil color: (Color r: 0.871 g: 0.871 b: 0.871) extension: a MorphExtension (2794) [other: (layoutPolicy -> a TableLayout) (la...etc... borderWidth: 1 borderColor: Color gray defaultTarget: a SystemWindow(316) selectedItem: a ToggleMenuItemMorph(2793)'inspect' stayUp: false popUpOwner: nil activeSubMenu: nil activatorDockingBar: nil MenuMorph(Morph)>>processEvent: Receiver: a MenuMorph(3977) Arguments and temporary variables: anEvent: [270@256 mouseUp 124582 nil] Receiver's instance variables: bounds: 202@33 corner: 368@399 owner: nil submorphs: an Array(an AlignmentMorph(187) a ToggleMenuItemMorph(2760)'grab' a ...etc... fullBounds: nil color: (Color r: 0.871 g: 0.871 b: 0.871) extension: a MorphExtension (2794) [other: (layoutPolicy -> a TableLayout) (la...etc... borderWidth: 1 borderColor: Color gray defaultTarget: a SystemWindow(316) selectedItem: a ToggleMenuItemMorph(2793)'inspect' stayUp: false popUpOwner: nil activeSubMenu: nil activatorDockingBar: nil MenuMorph>>handleFocusEvent: Receiver: a MenuMorph(3977) Arguments and temporary variables: evt: [270@256 mouseUp 124582 nil] Receiver's instance variables: bounds: 202@33 corner: 368@399 owner: nil submorphs: an Array(an AlignmentMorph(187) a ToggleMenuItemMorph(2760)'grab' a ...etc... fullBounds: nil color: (Color r: 0.871 g: 0.871 b: 0.871) extension: a MorphExtension (2794) [other: (layoutPolicy -> a TableLayout) (la...etc... borderWidth: 1 borderColor: Color gray defaultTarget: a SystemWindow(316) selectedItem: a ToggleMenuItemMorph(2793)'inspect' stayUp: false popUpOwner: nil activeSubMenu: nil activatorDockingBar: nil [] in HandMorph>>sendFocusEvent:to:clear: Receiver: a HandMorph(3216) Arguments and temporary variables: <<error during printing> Receiver's instance variables: bounds: 690@509 corner: 706@525 owner: a PasteUpMorph(1622) [world] submorphs: #() fullBounds: 690@509 corner: 706@525 color: Color blue extension: a MorphExtension (539) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: nil eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [690@509 mouseUp 805735 nil] targetOffset: 29@14 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: true temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 805735 690 509 0 0 0 1) lastKeyScanCode: 46 combinedChar: nil [] in PasteUpMorph>>becomeActiveDuring: Receiver: a PasteUpMorph(1622) [world] Arguments and temporary variables: <<error during printing> Receiver's instance variables: bounds: 0@0 corner: 976@638 owner: nil submorphs: an Array(a TaskbarMorph(3095) a SystemWindow(1204) a SystemWindow(31...etc... fullBounds: 0@0 corner: 976@638 color: (Color r: 0.97 g: 0.98 b: 1.0) extension: a MorphExtension (2543) [eventHandler = an EventHandler] [other: (...etc... borderWidth: 0 borderColor: (Color r: 0.03 g: 0.02 b: 0.0) presenter: a Presenter (1246) model: a MorphicModel(1926) cursor: 1 padding: 3 backgroundMorph: nil isPartsBin: nil autoLineLayout: false indicateCursor: nil resizeToFit: nil wantsMouseOverHalos: nil worldState: a WorldState griddingOn: nil BlockClosure>>on:do: Receiver: [closure] in PasteUpMorph>>becomeActiveDuring: Arguments and temporary variables: exception: Error handlerAction: [closure] in PasteUpMorph>>becomeActiveDuring: handlerActive: false Receiver's instance variables: outerContext: PasteUpMorph>>becomeActiveDuring: startpc: 67 numArgs: 0 PasteUpMorph>>becomeActiveDuring: Receiver: a PasteUpMorph(1622) [world] Arguments and temporary variables: aBlock: [closure] in HandMorph>>sendFocusEvent:to:clear: priorWorld: a PasteUpMorph(1622) [world] priorHand: a HandMorph(3216) priorEvent: [270@256 mouseOver red nil nil] Receiver's instance variables: bounds: 0@0 corner: 976@638 owner: nil submorphs: an Array(a TaskbarMorph(3095) a SystemWindow(1204) a SystemWindow(31...etc... fullBounds: 0@0 corner: 976@638 color: (Color r: 0.97 g: 0.98 b: 1.0) extension: a MorphExtension (2543) [eventHandler = an EventHandler] [other: (...etc... borderWidth: 0 borderColor: (Color r: 0.03 g: 0.02 b: 0.0) presenter: a Presenter (1246) model: a MorphicModel(1926) cursor: 1 padding: 3 backgroundMorph: nil isPartsBin: nil autoLineLayout: false indicateCursor: nil resizeToFit: nil wantsMouseOverHalos: nil worldState: a WorldState griddingOn: nil HandMorph>>sendFocusEvent:to:clear: Receiver: a HandMorph(3216) Arguments and temporary variables: anEvent: [270@256 mouseUp 124582 nil] focusHolder: a MenuMorph(3977) aBlock: [closure] in HandMorph>>sendMouseEvent: w: a PasteUpMorph(1622) [world] result: #(nil) Receiver's instance variables: bounds: 690@509 corner: 706@525 owner: a PasteUpMorph(1622) [world] submorphs: #() fullBounds: 690@509 corner: 706@525 color: Color blue extension: a MorphExtension (539) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: nil eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [690@509 mouseUp 805735 nil] targetOffset: 29@14 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: true temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 805735 690 509 0 0 0 1) lastKeyScanCode: 46 combinedChar: nil HandMorph>>sendEvent:focus:clear: Receiver: a HandMorph(3216) Arguments and temporary variables: anEvent: [270@256 mouseUp 124582 nil] focusHolder: a MenuMorph(3977) aBlock: [closure] in HandMorph>>sendMouseEvent: result: nil Receiver's instance variables: bounds: 690@509 corner: 706@525 owner: a PasteUpMorph(1622) [world] submorphs: #() fullBounds: 690@509 corner: 706@525 color: Color blue extension: a MorphExtension (539) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: nil eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [690@509 mouseUp 805735 nil] targetOffset: 29@14 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: true temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 805735 690 509 0 0 0 1) lastKeyScanCode: 46 combinedChar: nil HandMorph>>sendMouseEvent: Receiver: a HandMorph(3216) Arguments and temporary variables: anEvent: [270@256 mouseUp 124582 nil] Receiver's instance variables: bounds: 690@509 corner: 706@525 owner: a PasteUpMorph(1622) [world] submorphs: #() fullBounds: 690@509 corner: 706@525 color: Color blue extension: a MorphExtension (539) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: nil eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [690@509 mouseUp 805735 nil] targetOffset: 29@14 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: true temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 805735 690 509 0 0 0 1) lastKeyScanCode: 46 combinedChar: nil HandMorph>>handleEvent: Receiver: a HandMorph(3216) Arguments and temporary variables: anEvent: [270@256 mouseUp 124582 nil] evt: [270@256 mouseUp 124582 nil] ofs: nil Receiver's instance variables: bounds: 690@509 corner: 706@525 owner: a PasteUpMorph(1622) [world] submorphs: #() fullBounds: 690@509 corner: 706@525 color: Color blue extension: a MorphExtension (539) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: nil eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [690@509 mouseUp 805735 nil] targetOffset: 29@14 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: true temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 805735 690 509 0 0 0 1) lastKeyScanCode: 46 combinedChar: nil HandMorph>>processEvents Receiver: a HandMorph(3216) Arguments and temporary variables: evt: [270@256 mouseUp 124582 nil] evtBuf: #(1 124582 270 256 0 0 0 1) type: 1 hadAny: false Receiver's instance variables: bounds: 690@509 corner: 706@525 owner: a PasteUpMorph(1622) [world] submorphs: #() fullBounds: 690@509 corner: 706@525 color: Color blue extension: a MorphExtension (539) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: nil eventListeners: nil mouseListeners: nil keyboardListeners: nil mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [690@509 mouseUp 805735 nil] targetOffset: 29@14 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: true temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 805735 690 509 0 0 0 1) lastKeyScanCode: 46 combinedChar: nil [] in WorldState>>doOneCycleNowFor: Receiver: a WorldState Arguments and temporary variables: <<error during printing> Receiver's instance variables: hands: an Array(a HandMorph(3216)) viewBox: 0@0 corner: 976@638 canvas: a FormCanvas on: DisplayScreen(976x638x32) damageRecorder: a DamageRecorder stepList: a Heap(StepMessage(#stepAt: -> 3PButton(#toggleSelected 1603))(3PButt...etc... lastStepTime: 805807 lastStepMessage: nil lastCycleTime: 805754 commandHistory: a CommandHistory alarms: a Heap() lastAlarmTime: 805807 Array(SequenceableCollection)>>do: Receiver: an Array(a HandMorph(3216)) Arguments and temporary variables: aBlock: [closure] in WorldState>>doOneCycleNowFor: index: 1 indexLimiT: 1 Receiver's instance variables: an Array(a HandMorph(3216)) WorldState>>handsDo: Receiver: a WorldState Arguments and temporary variables: aBlock: [closure] in WorldState>>doOneCycleNowFor: Receiver's instance variables: hands: an Array(a HandMorph(3216)) viewBox: 0@0 corner: 976@638 canvas: a FormCanvas on: DisplayScreen(976x638x32) damageRecorder: a DamageRecorder stepList: a Heap(StepMessage(#stepAt: -> 3PButton(#toggleSelected 1603))(3PButt...etc... lastStepTime: 805807 lastStepMessage: nil lastCycleTime: 805754 commandHistory: a CommandHistory alarms: a Heap() lastAlarmTime: 805807 WorldState>>doOneCycleNowFor: Receiver: a WorldState Arguments and temporary variables: aWorld: a PasteUpMorph(1622) [world] Receiver's instance variables: hands: an Array(a HandMorph(3216)) viewBox: 0@0 corner: 976@638 canvas: a FormCanvas on: DisplayScreen(976x638x32) damageRecorder: a DamageRecorder stepList: a Heap(StepMessage(#stepAt: -> 3PButton(#toggleSelected 1603))(3PButt...etc... lastStepTime: 805807 lastStepMessage: nil lastCycleTime: 805754 commandHistory: a CommandHistory alarms: a Heap() lastAlarmTime: 805807 WorldState>>doOneCycleFor: Receiver: a WorldState Arguments and temporary variables: aWorld: a PasteUpMorph(1622) [world] Receiver's instance variables: hands: an Array(a HandMorph(3216)) viewBox: 0@0 corner: 976@638 canvas: a FormCanvas on: DisplayScreen(976x638x32) damageRecorder: a DamageRecorder stepList: a Heap(StepMessage(#stepAt: -> 3PButton(#toggleSelected 1603))(3PButt...etc... lastStepTime: 805807 lastStepMessage: nil lastCycleTime: 805754 commandHistory: a CommandHistory alarms: a Heap() lastAlarmTime: 805807 PasteUpMorph>>doOneCycle Receiver: a PasteUpMorph(1622) [world] Arguments and temporary variables: Receiver's instance variables: bounds: 0@0 corner: 976@638 owner: nil submorphs: an Array(a TaskbarMorph(3095) a SystemWindow(1204) a SystemWindow(31...etc... fullBounds: 0@0 corner: 976@638 color: (Color r: 0.97 g: 0.98 b: 1.0) extension: a MorphExtension (2543) [eventHandler = an EventHandler] [other: (...etc... borderWidth: 0 borderColor: (Color r: 0.03 g: 0.02 b: 0.0) presenter: a Presenter (1246) model: a MorphicModel(1926) cursor: 1 padding: 3 backgroundMorph: nil isPartsBin: nil autoLineLayout: false indicateCursor: nil resizeToFit: nil wantsMouseOverHalos: nil worldState: a WorldState griddingOn: nil [] in Project class>>spawnNewProcess Receiver: Project Arguments and temporary variables: Receiver's instance variables: superclass: Model methodDict: a MethodDictionary(size 167) format: 172 instanceVariables: #('world' 'changeSet' 'transcript' 'parentProject' 'previous...etc... organization: ('*Polymorph-Widgets' assureTaskbarPresenceMatchesPreference crea...etc... subclasses: nil name: #Project classPool: a Dictionary(#AllProjects->an OrderedCollection(a Project(Unnamed)) ...etc... sharedPools: nil environment: Smalltalk category: #'System-Support' traitComposition: {} localSelectors: nil [] in BlockClosure>>newProcess Receiver: [closure] in Project class>>spawnNewProcess Arguments and temporary variables: Receiver's instance variables: outerContext: Project class>>spawnNewProcess startpc: 53 numArgs: 0 --- The full stack --- NewInspector(Object)>>doesNotUnderstand: #extent: SystemWindow(Morph)>>inspectInMorphic: SystemWindow(Morph)>>inspectAt:event: [] 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: [] in HandMorph>>sendFocusEvent:to:clear: [] in PasteUpMorph>>becomeActiveDuring: BlockClosure>>on:do: PasteUpMorph>>becomeActiveDuring: HandMorph>>sendFocusEvent:to:clear: HandMorph>>sendEvent:focus:clear: HandMorph>>sendMouseEvent: HandMorph>>handleEvent: HandMorph>>processEvents [] in WorldState>>doOneCycleNowFor: Array(SequenceableCollection)>>do: WorldState>>handsDo: WorldState>>doOneCycleNowFor: WorldState>>doOneCycleFor: PasteUpMorph>>doOneCycle [] in Project class>>spawnNewProcess [] in BlockClosure>>newProcess

1 0