August 2009 - Pharo-dev - lists.pharo.org

[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

[Pharo-project] [BUG]OpenDBXMacOSX(Object)>>error:
by FranÃ§ois Tanguy Aug. 23, 2009

Aug. 23, 2009

Hello, it may be a noobie question but I tried to execute the GlorpTest and it failed in one case. If the DBXDriver is used, the tests failed. (See the stacktrace below) | tr | SqueakDatabaseAccessor DefaultDriver: SqueakDBXDriver. tr := TestRunner new. ToolBuilder open: tr. tr categoryAt: (tr categoryList indexOf: 'GlorpTest') put: true; selectAllClasses; runAll. But the native driver is used, the tests passed. | tr | SqueakDatabaseAccessor DefaultDriver: NativePostgresDriver. tr := TestRunner new. ToolBuilder open: tr. tr categoryAt: (tr categoryList indexOf: 'GlorpTest') put: true; selectAllClasses; runAll. I thought the DBXDriver could be used to manage postgresql database, no ? FranÃ§ois ps : I am using pharo1.0-10418-BETAweb09.08.2 and I changed the login information in the correct methods (defaultPostgreSQLLocalLogin and buildDefaultConnectionArgs). 21 August 2009 11:13:22 am VM: Mac OS - intel - 1058 - Squeak3.8.1 of '28 Aug 2006' [latest update: #6747] Squeak VM 4.1.1b2 Image: Pharo1.0beta [Latest update: #10418] SecurityManager state: Restricted: false FileAccess: true SocketAccess: true Working Dir /Users/paco/Desktop/pharo1.0-10418-BETAweb09.08.2 Trusted Dir /foobar/tooBar/forSqueak/bogus Untrusted Dir /Users/paco/Library/Preferences/Squeak/Internet/My Squeak OpenDBXMacOSX(Object)>>error: Receiver: an OpenDBXMacOSX Arguments and temporary variables: aString: 'Unable to find function address' Receiver's instance variables: an OpenDBXMacOSX OpenDBXMacOSX(Object)>>externalCallFailed Receiver: an OpenDBXMacOSX Arguments and temporary variables: errCode: 13 Receiver's instance variables: an OpenDBXMacOSX OpenDBXMacOSX(OpenDBXUnix)>>apiInitialize:backend:host:port: Receiver: an OpenDBXMacOSX Arguments and temporary variables: handle: a WordArray(0) backend: 'pgsql' host: '127.0.0.1' port: '5432' Receiver's instance variables: an OpenDBXMacOSX DBXPostgresPlatform(DBXPlatform)>>createConnection: Receiver: a DBXPostgresPlatform Arguments and temporary variables: aConnection: a DBXConnection err: nil handleArray: a WordArray(0) handle: nil Receiver's instance variables: a DBXPostgresPlatform DBXConnection>>connect Receiver: a DBXConnection Arguments and temporary variables: Receiver's instance variables: platform: a DBXPostgresPlatform settings: a DBXConnectionSettings handle: nil open: a ValueHolder connected: a ValueHolder result: nil SqueakDBXDriver>>connect: Receiver: a SqueakDBXDriver Arguments and temporary variables: aLogin: a Login(a PostgreSQLPlatform, 'postgres', 'vorevoca', '127.0.0.1_glorp'...etc... Receiver's instance variables: connection: a DBXConnection database: nil [] in SqueakDatabaseAccessor>>loginIfError: Receiver: a SqueakDatabaseAccessor Arguments and temporary variables: <<error during printing> Receiver's instance variables: connection: nil currentLogin: a Login(a PostgreSQLPlatform, 'postgres', 'vorevoca', '127.0.0.1_...etc... logging: nil reusePreparedStatements: nil deniedCommands: nil mutex: a Semaphore() dependents: nil isInTransaction: false databaseDriver: a SqueakDBXDriver BlockClosure>>on:do: Receiver: [closure] in SqueakDatabaseAccessor>>loginIfError: Arguments and temporary variables: exception: Error handlerAction: [closure] in SqueakDatabaseAccessor(DatabaseAccessor)>>login handlerActive: false Receiver's instance variables: outerContext: SqueakDatabaseAccessor>>loginIfError: startpc: 60 numArgs: 0 SqueakDatabaseAccessor(DatabaseAccessor)>>execute:ifError: Receiver: a SqueakDatabaseAccessor Arguments and temporary variables: aBlock: [closure] in SqueakDatabaseAccessor>>loginIfError: errorBlock: [closure] in SqueakDatabaseAccessor(DatabaseAccessor)>>login Receiver's instance variables: connection: nil currentLogin: a Login(a PostgreSQLPlatform, 'postgres', 'vorevoca', '127.0.0.1_...etc... logging: nil reusePreparedStatements: nil deniedCommands: nil mutex: a Semaphore() dependents: nil isInTransaction: false databaseDriver: a SqueakDBXDriver SqueakDatabaseAccessor>>loginIfError: Receiver: a SqueakDatabaseAccessor Arguments and temporary variables: aBlock: [closure] in SqueakDatabaseAccessor(DatabaseAccessor)>>login Receiver's instance variables: connection: nil currentLogin: a Login(a PostgreSQLPlatform, 'postgres', 'vorevoca', '127.0.0.1_...etc... logging: nil reusePreparedStatements: nil deniedCommands: nil mutex: a Semaphore() dependents: nil isInTransaction: false databaseDriver: a SqueakDBXDriver SqueakDatabaseAccessor(DatabaseAccessor)>>login Receiver: a SqueakDatabaseAccessor Arguments and temporary variables: Receiver's instance variables: connection: nil currentLogin: a Login(a PostgreSQLPlatform, 'postgres', 'vorevoca', '127.0.0.1_...etc... logging: nil reusePreparedStatements: nil deniedCommands: nil mutex: a Semaphore() dependents: nil isInTransaction: false databaseDriver: a SqueakDBXDriver GlorpDatabaseLoginResource>>setUp Receiver: GlorpDatabaseLoginResource Arguments and temporary variables: Receiver's instance variables: name: nil description: nil accessor: a SqueakDatabaseAccessor login: a Login(a PostgreSQLPlatform, 'postgres', 'vorevoca', '127.0.0.1_glorp')...etc... GlorpDatabaseLoginResource(TestResource)>>initialize Receiver: GlorpDatabaseLoginResource Arguments and temporary variables: Receiver's instance variables: name: nil description: nil accessor: a SqueakDatabaseAccessor login: a Login(a PostgreSQLPlatform, 'postgres', 'vorevoca', '127.0.0.1_glorp')...etc... GlorpDatabaseLoginResource class(Behavior)>>new Receiver: GlorpDatabaseLoginResource Arguments and temporary variables: Receiver's instance variables: superclass: TestResource methodDict: a MethodDictionary(#accessor->a CompiledMethod (1052) #accessor:->a...etc... format: 138 instanceVariables: #('accessor' 'login') organization: ('accessing' accessor accessor: login login: platform) ('initiali...etc... subclasses: nil name: #GlorpDatabaseLoginResource classPool: a Dictionary(#DefaultLogin->a Login(a PostgreSQLPlatform, 'postgres'...etc... sharedPools: nil environment: Smalltalk category: #'OpenDBX-Glorp-Core-Test' traitComposition: nil localSelectors: nil current: nil GlorpDatabaseLoginResource class(TestResource class)>>current Receiver: GlorpDatabaseLoginResource Arguments and temporary variables: Receiver's instance variables: superclass: TestResource methodDict: a MethodDictionary(#accessor->a CompiledMethod (1052) #accessor:->a...etc... format: 138 instanceVariables: #('accessor' 'login') organization: ('accessing' accessor accessor: login login: platform) ('initiali...etc... subclasses: nil name: #GlorpDatabaseLoginResource classPool: a Dictionary(#DefaultLogin->a Login(a PostgreSQLPlatform, 'postgres'...etc... sharedPools: nil environment: Smalltalk category: #'OpenDBX-Glorp-Core-Test' traitComposition: nil localSelectors: nil current: nil GlorpDemoTablePopulatorResource>>setUp Receiver: GlorpDemoTablePopulatorResource Arguments and temporary variables: Receiver's instance variables: name: nil description: nil login: nil GlorpDemoTablePopulatorResource(TestResource)>>initialize Receiver: GlorpDemoTablePopulatorResource Arguments and temporary variables: Receiver's instance variables: name: nil description: nil login: nil GlorpDemoTablePopulatorResource class(Behavior)>>new Receiver: GlorpDemoTablePopulatorResource Arguments and temporary variables: Receiver's instance variables: superclass: TestResource methodDict: a MethodDictionary(#populateStuffTable->a CompiledMethod (555) #set...etc... format: 136 instanceVariables: #('login') organization: ('setup' populateStuffTable setUp) ('*glorpTestPostload-override'...etc... subclasses: nil name: #GlorpDemoTablePopulatorResource classPool: a Dictionary(#NeedsSetup->false ) sharedPools: nil environment: Smalltalk category: #GlorpTest traitComposition: nil localSelectors: nil current: nil GlorpDemoTablePopulatorResource class(TestResource class)>>current Receiver: GlorpDemoTablePopulatorResource Arguments and temporary variables: Receiver's instance variables: superclass: TestResource methodDict: a MethodDictionary(#populateStuffTable->a CompiledMethod (555) #set...etc... format: 136 instanceVariables: #('login') organization: ('setup' populateStuffTable setUp) ('*glorpTestPostload-override'...etc... subclasses: nil name: #GlorpDemoTablePopulatorResource classPool: a Dictionary(#NeedsSetup->false ) sharedPools: nil environment: Smalltalk category: #GlorpTest traitComposition: nil localSelectors: nil current: nil GlorpSessionResource>>glorpTestsSystem Receiver: GlorpSessionResource Arguments and temporary variables: Receiver's instance variables: name: nil description: nil session: nil GlorpSessionResource>>setUp Receiver: GlorpSessionResource Arguments and temporary variables: Receiver's instance variables: name: nil description: nil session: nil GlorpSessionResource(TestResource)>>initialize Receiver: GlorpSessionResource Arguments and temporary variables: Receiver's instance variables: name: nil description: nil session: nil GlorpSessionResource class(Behavior)>>new Receiver: GlorpSessionResource Arguments and temporary variables: Receiver's instance variables: superclass: TestResource methodDict: a MethodDictionary(#glorpTestsSystem->a CompiledMethod (1814) #newS...etc... format: 136 instanceVariables: #('session') organization: ('setup' glorpTestsSystem setUp) ('accessing' newSession session)...etc... subclasses: nil name: #GlorpSessionResource classPool: nil sharedPools: nil environment: Smalltalk category: #GlorpTest traitComposition: nil localSelectors: nil current: nil GlorpSessionResource class(TestResource class)>>current Receiver: GlorpSessionResource Arguments and temporary variables: Receiver's instance variables: superclass: TestResource methodDict: a MethodDictionary(#glorpTestsSystem->a CompiledMethod (1814) #newS...etc... format: 136 instanceVariables: #('session') organization: ('setup' glorpTestsSystem setUp) ('accessing' newSession session)...etc... subclasses: nil name: #GlorpSessionResource classPool: nil sharedPools: nil environment: Smalltalk category: #GlorpTest traitComposition: nil localSelectors: nil current: nil GlorpSessionResource class(TestResource class)>>isAvailable Receiver: GlorpSessionResource Arguments and temporary variables: Receiver's instance variables: superclass: TestResource methodDict: a MethodDictionary(#glorpTestsSystem->a CompiledMethod (1814) #newS...etc... format: 136 instanceVariables: #('session') organization: ('setup' glorpTestsSystem setUp) ('accessing' newSession session)...etc... subclasses: nil name: #GlorpSessionResource classPool: nil sharedPools: nil environment: Smalltalk category: #GlorpTest traitComposition: nil localSelectors: nil current: nil [] in TestRunner>>basicSetUpSuite: Receiver: a TestRunner Arguments and temporary variables: <<error during printing> Receiver's instance variables: categories: #(#'AST-Tests' #'AutomaticMethodCategorizer-Tests' #'AutomaticMetho...etc... categoriesSelected: a Set(#GlorpTest) classes: {GlorpBreadthFirstTopologicalSortTest . GlorpCommandTest . GlorpCursor...etc... classIndex: 0 classesSelected: a Set(GlorpSQLPrintingTest GlorpDatabaseBasedTest GlorpManyToM...etc... failedList: #() failedSelected: nil errorList: #() errorSelected: nil lastUpdate: 3428305867 result: 0 run, 0 passes, 0 expected failures, 0 failures, 0 errors, 0 unexpecte...etc... previousRun: nil Set>>do: Receiver: a Set(GlorpSessionResource GlorpDatabaseLoginResource GlorpDemoTablePopulatorResource) Arguments and temporary variables: aBlock: [closure] in TestRunner>>basicSetUpSuite: index: 2 each: GlorpSessionResource indexLimiT: 5 Receiver's instance variables: tally: 3 array: {nil . GlorpSessionResource . GlorpDatabaseLoginResource . GlorpDemoTabl...etc... TestRunner>>basicSetUpSuite: Receiver: a TestRunner Arguments and temporary variables: aTestSuite: a TestSuite Receiver's instance variables: categories: #(#'AST-Tests' #'AutomaticMethodCategorizer-Tests' #'AutomaticMetho...etc... categoriesSelected: a Set(#GlorpTest) classes: {GlorpBreadthFirstTopologicalSortTest . GlorpCommandTest . GlorpCursor...etc... classIndex: 0 classesSelected: a Set(GlorpSQLPrintingTest GlorpDatabaseBasedTest GlorpManyToM...etc... failedList: #() failedSelected: nil errorList: #() errorSelected: nil lastUpdate: 3428305867 result: 0 run, 0 passes, 0 expected failures, 0 failures, 0 errors, 0 unexpecte...etc... previousRun: nil TestRunner>>basicRunSuite:do: Receiver: a TestRunner Arguments and temporary variables: aTestSuite: a TestSuite aBlock: [closure] in TestRunner>>runSuite: Receiver's instance variables: categories: #(#'AST-Tests' #'AutomaticMethodCategorizer-Tests' #'AutomaticMetho...etc... categoriesSelected: a Set(#GlorpTest) classes: {GlorpBreadthFirstTopologicalSortTest . GlorpCommandTest . GlorpCursor...etc... classIndex: 0 classesSelected: a Set(GlorpSQLPrintingTest GlorpDatabaseBasedTest GlorpManyToM...etc... failedList: #() failedSelected: nil errorList: #() errorSelected: nil lastUpdate: 3428305867 result: 0 run, 0 passes, 0 expected failures, 0 failures, 0 errors, 0 unexpecte...etc... previousRun: nil TestRunner>>runSuite: Receiver: a TestRunner Arguments and temporary variables: aTestSuite: a TestSuite Receiver's instance variables: categories: #(#'AST-Tests' #'AutomaticMethodCategorizer-Tests' #'AutomaticMetho...etc... categoriesSelected: a Set(#GlorpTest) classes: {GlorpBreadthFirstTopologicalSortTest . GlorpCommandTest . GlorpCursor...etc... classIndex: 0 classesSelected: a Set(GlorpSQLPrintingTest GlorpDatabaseBasedTest GlorpManyToM...etc... failedList: #() failedSelected: nil errorList: #() errorSelected: nil lastUpdate: 3428305867 result: 0 run, 0 passes, 0 expected failures, 0 failures, 0 errors, 0 unexpecte...etc... previousRun: nil TestRunner>>runAll Receiver: a TestRunner Arguments and temporary variables: Receiver's instance variables: categories: #(#'AST-Tests' #'AutomaticMethodCategorizer-Tests' #'AutomaticMetho...etc... categoriesSelected: a Set(#GlorpTest) classes: {GlorpBreadthFirstTopologicalSortTest . GlorpCommandTest . GlorpCursor...etc... classIndex: 0 classesSelected: a Set(GlorpSQLPrintingTest GlorpDatabaseBasedTest GlorpManyToM...etc... failedList: #() failedSelected: nil errorList: #() errorSelected: nil lastUpdate: 3428305867 result: 0 run, 0 passes, 0 expected failures, 0 failures, 0 errors, 0 unexpecte...etc... previousRun: nil UndefinedObject>>DoIt Receiver: nil Arguments and temporary variables: tr: a TestRunner Receiver's instance variables: nil Compiler>>evaluate:in:to:notifying:ifFail:logged: Receiver: a Compiler Arguments and temporary variables: <<error during printing> Receiver's instance variables: sourceStream: a ReadWriteStream ' |tr | SqueakDatabaseAccessor DefaultDriver: S...etc... requestor: a TextMorphForShoutEditor class: UndefinedObject category: nil context: nil parser: a Parser [] in TextMorphForShoutEditor(ParagraphEditor)>>evaluateSelection Receiver: a TextMorphForShoutEditor Arguments and temporary variables: <<error during printing> Receiver's instance variables: model: a SHWorkspace paragraph: a MultiNewParagraph startBlock: a CharacterBlock with index 201 and character Character cr and rect...etc... stopBlock: a CharacterBlock with index 201 and character Character cr and recta...etc... beginTypeInBlock: nil emphasisHere: an Array(a TextColor code: Color red) initialText: a Text for ' |tr | tr := TestRunner new. ToolBuilder open: tr. tr ...etc... selectionShowing: false otherInterval: (403 to: 402) lastParentLocation: nil morph: a TextMorphForShout(168) oldInterval: (106 to: 105) pivotBlock: a CharacterBlock with index 200 and character Character cr and rect...etc... inBackTo: false BlockClosure>>on:do: Receiver: [closure] in TextMorphForShoutEditor(ParagraphEditor)>>evaluateSelection Arguments and temporary variables: exception: OutOfScopeNotification handlerAction: [closure] in TextMorphForShoutEditor(ParagraphEditor)>>evaluateS...etc... handlerActive: true Receiver's instance variables: outerContext: TextMorphForShoutEditor(ParagraphEditor)>>evaluateSelection startpc: 116 numArgs: 0 TextMorphForShoutEditor(ParagraphEditor)>>evaluateSelection Receiver: a TextMorphForShoutEditor Arguments and temporary variables: result: nil rcvr: nil ctxt: nil Receiver's instance variables: model: a SHWorkspace paragraph: a MultiNewParagraph startBlock: a CharacterBlock with index 201 and character Character cr and rect...etc... stopBlock: a CharacterBlock with index 201 and character Character cr and recta...etc... beginTypeInBlock: nil emphasisHere: an Array(a TextColor code: Color red) initialText: a Text for ' |tr | tr := TestRunner new. ToolBuilder open: tr. tr ...etc... selectionShowing: false otherInterval: (403 to: 402) lastParentLocation: nil morph: a TextMorphForShout(168) oldInterval: (106 to: 105) pivotBlock: a CharacterBlock with index 200 and character Character cr and rect...etc... inBackTo: false TextMorphForShoutEditor(ParagraphEditor)>>doIt Receiver: a TextMorphForShoutEditor Arguments and temporary variables: Receiver's instance variables: model: a SHWorkspace paragraph: a MultiNewParagraph startBlock: a CharacterBlock with index 201 and character Character cr and rect...etc... stopBlock: a CharacterBlock with index 201 and character Character cr and recta...etc... beginTypeInBlock: nil emphasisHere: an Array(a TextColor code: Color red) initialText: a Text for ' |tr | tr := TestRunner new. ToolBuilder open: tr. tr ...etc... selectionShowing: false otherInterval: (403 to: 402) lastParentLocation: nil morph: a TextMorphForShout(168) oldInterval: (106 to: 105) pivotBlock: a CharacterBlock with index 200 and character Character cr and rect...etc... inBackTo: false [] in TextMorphForShoutEditor(ParagraphEditor)>>doIt: Receiver: a TextMorphForShoutEditor Arguments and temporary variables: <<error during printing> Receiver's instance variables: model: a SHWorkspace paragraph: a MultiNewParagraph startBlock: a CharacterBlock with index 201 and character Character cr and rect...etc... stopBlock: a CharacterBlock with index 201 and character Character cr and recta...etc... beginTypeInBlock: nil emphasisHere: an Array(a TextColor code: Color red) initialText: a Text for ' |tr | tr := TestRunner new. ToolBuilder open: tr. tr ...etc... selectionShowing: false otherInterval: (403 to: 402) lastParentLocation: nil morph: a TextMorphForShout(168) oldInterval: (106 to: 105) pivotBlock: a CharacterBlock with index 200 and character Character cr and rect...etc... inBackTo: false TextMorphForShoutEditor(ParagraphEditor)>>terminateAndInitializeAround: Receiver: a TextMorphForShoutEditor Arguments and temporary variables: aBlock: [closure] in TextMorphForShoutEditor(ParagraphEditor)>>doIt: Receiver's instance variables: model: a SHWorkspace paragraph: a MultiNewParagraph startBlock: a CharacterBlock with index 201 and character Character cr and rect...etc... stopBlock: a CharacterBlock with index 201 and character Character cr and recta...etc... beginTypeInBlock: nil emphasisHere: an Array(a TextColor code: Color red) initialText: a Text for ' |tr | tr := TestRunner new. ToolBuilder open: tr. tr ...etc... selectionShowing: false otherInterval: (403 to: 402) lastParentLocation: nil morph: a TextMorphForShout(168) oldInterval: (106 to: 105) pivotBlock: a CharacterBlock with index 200 and character Character cr and rect...etc... inBackTo: false --- The full stack --- OpenDBXMacOSX(Object)>>error: OpenDBXMacOSX(Object)>>externalCallFailed OpenDBXMacOSX(OpenDBXUnix)>>apiInitialize:backend:host:port: DBXPostgresPlatform(DBXPlatform)>>createConnection: DBXConnection>>connect SqueakDBXDriver>>connect: [] in SqueakDatabaseAccessor>>loginIfError: BlockClosure>>on:do: SqueakDatabaseAccessor(DatabaseAccessor)>>execute:ifError: SqueakDatabaseAccessor>>loginIfError: SqueakDatabaseAccessor(DatabaseAccessor)>>login GlorpDatabaseLoginResource>>setUp GlorpDatabaseLoginResource(TestResource)>>initialize GlorpDatabaseLoginResource class(Behavior)>>new GlorpDatabaseLoginResource class(TestResource class)>>current GlorpDemoTablePopulatorResource>>setUp GlorpDemoTablePopulatorResource(TestResource)>>initialize GlorpDemoTablePopulatorResource class(Behavior)>>new GlorpDemoTablePopulatorResource class(TestResource class)>>current GlorpSessionResource>>glorpTestsSystem GlorpSessionResource>>setUp GlorpSessionResource(TestResource)>>initialize GlorpSessionResource class(Behavior)>>new GlorpSessionResource class(TestResource class)>>current GlorpSessionResource class(TestResource class)>>isAvailable [] in TestRunner>>basicSetUpSuite: Set>>do: TestRunner>>basicSetUpSuite: TestRunner>>basicRunSuite:do: TestRunner>>runSuite: TestRunner>>runAll UndefinedObject>>DoIt Compiler>>evaluate:in:to:notifying:ifFail:logged: [] in TextMorphForShoutEditor(ParagraphEditor)>>evaluateSelection BlockClosure>>on:do: TextMorphForShoutEditor(ParagraphEditor)>>evaluateSelection TextMorphForShoutEditor(ParagraphEditor)>>doIt [] in TextMorphForShoutEditor(ParagraphEditor)>>doIt: TextMorphForShoutEditor(ParagraphEditor)>>terminateAndInitializeAround: - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - TextMorphForShoutEditor(ParagraphEditor)>>doIt: TextMorphForShoutEditor(ParagraphEditor)>>dispatchOnKeyEvent:with: TextMorphForShoutEditor(TextMorphEditor)>>dispatchOnKeyEvent:with: TextMorphForShoutEditor(ParagraphEditor)>>keystroke: TextMorphForShoutEditor(TextMorphEditor)>>keystroke: [] in [] in TextMorphForShout(TextMorph)>>keyStroke: TextMorphForShout(TextMorph)>>handleInteraction: TextMorphForShout(TextMorphForEditView)>>handleInteraction: [] in TextMorphForShout(TextMorph)>>keyStroke: ECToolSet class>>codeCompletionAround:textMorph:keyStroke: DEVToolSet class>>codeCompletionAround:textMorph:keyStroke: ToolSet class>>codeCompletionAround:textMorph:keyStroke: TextMorphForShout(TextMorph)>>keyStroke: TextMorphForShout(TextMorphForEditView)>>keyStroke: TextMorphForShout(TextMorph)>>handleKeystroke: KeyboardEvent>>sentTo: TextMorphForShout(Morph)>>handleEvent: TextMorphForShout(Morph)>>handleFocusEvent: [] in HandMorph>>sendFocusEvent:to:clear: [] in PasteUpMorph>>becomeActiveDuring: BlockClosure>>on:do: PasteUpMorph>>becomeActiveDuring: HandMorph>>sendFocusEvent:to:clear: HandMorph>>sendEvent:focus:clear: HandMorph>>sendKeyboardEvent: 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

3 5

[Pharo-project] Line end convention in MultiByteFileStream
by Damien Cassou Aug. 23, 2009

Aug. 23, 2009

Hi, when creating a file, the line end convention of the OS is not enforced by default. As an example, FileStream forceNewFileNamed: 'test' do: [:stream | stream nextPut: $a; cr; nextPut: $b; cr] always creates a file with MacOS X line end convention. To enforce the line end convention of the system, one has to do the following: ... do: [:stream | stream wantsLineEndConvention: true; ... is it the desired behavior? If yes, should we ensure that #wantsLineEndConvention is called each time Pharo generates a file for the user (e.g., PharoDebug.log). -- Damien Cassou http://damiencassou.seasidehosting.st "Lambdas are relegated to relative obscurity until Java makes them popular by not having them." James Iry

4 8