March 2012 - Pharo-dev - lists.pharo.org

Re: [Pharo-project] how to get a string read stream from filesystem

by StÃ©phane Ducasse

On Mar 27, 2012, at 3:33 AM, Sean P. DeNigris wrote: > > Lukas Renggli wrote >> >> As I just wrote a few days ago, you must use... #fileStreamDo: ...to get >> the traditional system stream >> > > I just ran into this. To start, how about a comment in #readStream and > friends pointing this out? please do. > > Sean > > -- > View this message in context: http://forum.world.st/how-to-get-a-string-read-stream-from-filesystem-tp408… > Sent from the Pharo Smalltalk mailing list archive at Nabble.com. >

March 27, 2012

[Pharo-project] interpreter cannot read image file

by Pavel Krivanek

Hi, I'm trying to open an old production image based on Squeak 3.9.1 file with CogVM and I get: This interpreter (vers. 6505) cannot read image file (vers. 6502) I've always seen only the inverse report. Any idea how to convert the image? Cheers, -- Pavel

March 27, 2012

Re: [Pharo-project] Morpheas , bringing Morphic to Opengl (3d GUIs)

by chadwick

oh god sorry for that call stack ^ ! I just noticed I'm getting this error too: ioLoadModule(/usr/lib/nvidia-current-updates/libGL.so): /usr/lib/nvidia-current-updates/libGL.so: wrong ELF class: ELFCLASS64 in the console, so it's a 32/64 bit thing. I'm on 64bit ubuntu, and I have ia32-libs installed

March 27, 2012

Re: [Pharo-project] Morpheas , bringing Morphic to Opengl (3d GUIs)

by chadwick

yes, I was executing GLTTRenderingDemo new openInWorld. My FFI path is /usr/lib/nvidia-current-updates/libGL.so.1 (got from ldd /usr/bin/glxgears) VM: unix - i686 - linux-gnu - NBCoInterpreter NativeBoost-CogPlugin-IgorStasenko.8 uuid: f47ef546-de3d-4415-850e-6437d67bfb5c Aug 9 2011, StackToRegisterMappingCogit VMMaker-oscog-IgorStasenko.108 uuid: 384f4108-f1f4-4954-8357-0b3005cb81e2 Aug 9 2011, https://git.gitorious.org/cogvm/blessed.git Commit: f6deabba4432fa22b767dc17718a0fb84c9f3e88 Date: Tue Aug 9 14:47:19 2011 +0200 By: Igor Stasenko <siguctua(a)gmail.com> Image: Pharo1.4a [Latest update: #14284] NBFFICallout(Object)>>error: Receiver: a NBFFICallout Arguments and temporary variables: aString: 'function unavailable' Receiver's instance variables: asm: an AJx86Assembler proxy: a NBInterpreterProxy options: a Set(#optCoerceNilToNull #optCdecl #optAllowByteArraysPtr #optUseStac...etc... method: (NBGlxAPI>>#queryExtension:errorBase:eventBase: "a CompiledMethod(54211...etc... fnSpec: a NBFnSpec requestor: NBGlxAPI methodArgs: #('display' 'errorBase' 'eventBase') coercionMayFail: false callInfo: nil NBFFICallout>>generateCall:module: Receiver: a NBFFICallout Arguments and temporary variables: functionSpec: #(#bool #glXQueryExtension #(#Display #display #, #int #* #errorB...etc... aModuleNameOrHandle: '/usr/lib/nvidia-current-updates/libGL.so.1' fnAddress: nil Receiver's instance variables: asm: an AJx86Assembler proxy: a NBInterpreterProxy options: a Set(#optCoerceNilToNull #optCdecl #optAllowByteArraysPtr #optUseStac...etc... method: (NBGlxAPI>>#queryExtension:errorBase:eventBase: "a CompiledMethod(54211...etc... fnSpec: a NBFnSpec requestor: NBGlxAPI methodArgs: #('display' 'errorBase' 'eventBase') coercionMayFail: false callInfo: nil [:generator | generator sender: sender; callType: self callType; generateCall: fnSpec module: self moduleName] in NBGlxAPI>>call: Receiver: a NBGlxAPI Arguments and temporary variables: fnSpec: a NBFFICallout sender: #(#bool #glXQueryExtension #(#Display #display #, #int #* #errorBase #,...etc... generator: NBGlxAPI>>queryExtension:errorBase:eventBase: Receiver's instance variables: fnAddresses: #[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...etc... renderingContextHandle: nil extensions: nil NBFFICallout class(NBNativeCodeGen class)>>generateCode:andRetry: Receiver: NBFFICallout Arguments and temporary variables: aBlock: [:generator | generator sender: sender; callType: self callType; ...etc... retryCtx: NBGlxAPI>>queryExtension:errorBase:eventBase: method: (NBGlxAPI>>#queryExtension:errorBase:eventBase: "a CompiledMethod(54211...etc... code: nil newMethod: nil args: nil i: nil iLimiT: nil Receiver's instance variables: superclass: NBNativeCodeGen methodDict: a MethodDictionary(#aliasForType:->(NBFFICallout>>#aliasForType: "a...etc... format: 148 instanceVariables: #('fnSpec' 'requestor' 'methodArgs' 'coercionMayFail' 'callI...etc... organization: ('type aliases' aliasForType:) ('accessing' anonSpec: callType: c...etc... subclasses: {NBNativeFunctionGen} name: #NBFFICallout classPool: a Dictionary(#CustomErrorCodes->a Dictionary(600->'An instance of NB...etc... sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'NativeBoost-Core' traitComposition: {} localSelectors: nil NBFFICallout class(NBNativeCodeGen class)>>handleFailureIn:nativeCode: Receiver: NBFFICallout Arguments and temporary variables: aContext: NBGlxAPI>>queryExtension:errorBase:eventBase: aBlock: [:generator | generator sender: sender; callType: self callType; ...etc... method: (NBGlxAPI>>#queryExtension:errorBase:eventBase: "a CompiledMethod(54211...etc... lastError: 502 lit: #(#NativeBoostPlugin #primitiveNativeCall 0 87) Receiver's instance variables: superclass: NBNativeCodeGen methodDict: a MethodDictionary(#aliasForType:->(NBFFICallout>>#aliasForType: "a...etc... format: 148 instanceVariables: #('fnSpec' 'requestor' 'methodArgs' 'coercionMayFail' 'callI...etc... organization: ('type aliases' aliasForType:) ('accessing' anonSpec: callType: c...etc... subclasses: {NBNativeFunctionGen} name: #NBFFICallout classPool: a Dictionary(#CustomErrorCodes->a Dictionary(600->'An instance of NB...etc... sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'NativeBoost-Core' traitComposition: {} localSelectors: nil NBGlxAPI>>call: Receiver: a NBGlxAPI Arguments and temporary variables: fnSpec: #(#bool #glXQueryExtension #(#Display #display #, #int #* #errorBase #,...etc... sender: NBGlxAPI>>queryExtension:errorBase:eventBase: Receiver's instance variables: fnAddresses: #[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...etc... renderingContextHandle: nil extensions: nil NBGlxAPI>>queryExtension:errorBase:eventBase: Receiver: a NBGlxAPI Arguments and temporary variables: display: a NBXLibDisplay( 0x8D4DF78 ) errorBase: a WordArray(0) eventBase: a WordArray(0) Receiver's instance variables: fnAddresses: #[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...etc... renderingContextHandle: nil extensions: nil NBGLXContextDriver>>createContext: Receiver: a NBGLXContextDriver Arguments and temporary variables: initialExtent: (50@40) display: a NBXLibDisplay( 0x8D4DF78 ) window: nil visualInfo: nil colormap: nil xattributes: nil childWin: nil glxSupported: nil configsNumber: nil configs: nil Receiver's instance variables: gl: a NBGlxAPI ctx: nil NBGLContextDriver class>>createContext: Receiver: NBGLContextDriver Arguments and temporary variables: initialExtent: (50@40) Receiver's instance variables: superclass: Object methodDict: a MethodDictionary(#changeViewportSize:->(NBGLContextDriver>>#chang...etc... format: 132 instanceVariables: #('gl') organization: ('viewport' changeViewportSize:) ('initialize-release' createCont...etc... subclasses: {NBMacGLContextDriver. NBGLXContextDriver} name: #NBGLContextDriver classPool: nil sharedPools: an OrderedCollection(NBGLConstants) environment: a SystemDictionary(lots of globals) category: #'NBOpenGL-Display' traitComposition: {} localSelectors: nil NBGLDisplay class>>extent: Receiver: NBGLDisplay Arguments and temporary variables: anInitialExtent: (50@40) driver: nil extensions: nil disp: nil ext: (50@40) Receiver's instance variables: superclass: Object methodDict: a MethodDictionary(#canUseForm:->(NBGLDisplay>>#canUseForm: "a Comp...etc... format: 136 instanceVariables: #('session' 'extent' 'driver') organization: ('reading pixels' canUseForm: updateForm:bounds:) ('viewport' cha...etc... subclasses: {NBMSAAOffscreenDisplay. NBOffscreenDisplay} name: #NBGLDisplay classPool: nil sharedPools: an OrderedCollection(NBGLConstants) environment: a SystemDictionary(lots of globals) category: #'NBOpenGL-Display' traitComposition: {} localSelectors: nil GLTTRenderingDemo(GLViewportMorph)>>initializeForNewSession Receiver: a GLTTRenderingDemo(684982272) Arguments and temporary variables: Receiver's instance variables: bounds: (0@0) corner: (50@40) owner: nil submorphs: #() fullBounds: (0@0) corner: (50@40) color: Color blue extension: a MorphExtension (693370880) session: nil form: nil useOwnForm: nil display: nil d: nil glyphCache: nil font: nil curveRenderer: nil frameStats: nil start: nil frameCount: nil GLTTRenderingDemo>>initializeForNewSession Receiver: a GLTTRenderingDemo(684982272) Arguments and temporary variables: Receiver's instance variables: bounds: (0@0) corner: (50@40) owner: nil submorphs: #() fullBounds: (0@0) corner: (50@40) color: Color blue extension: a MorphExtension (693370880) session: nil form: nil useOwnForm: nil display: nil d: nil glyphCache: nil font: nil curveRenderer: nil frameStats: nil start: nil frameCount: nil GLTTRenderingDemo(GLViewportMorph)>>initialize Receiver: a GLTTRenderingDemo(684982272) Arguments and temporary variables: Receiver's instance variables: bounds: (0@0) corner: (50@40) owner: nil submorphs: #() fullBounds: (0@0) corner: (50@40) color: Color blue extension: a MorphExtension (693370880) session: nil form: nil useOwnForm: nil display: nil d: nil glyphCache: nil font: nil curveRenderer: nil frameStats: nil start: nil frameCount: nil GLTTRenderingDemo>>initialize Receiver: a GLTTRenderingDemo(684982272) Arguments and temporary variables: fontPath: nil Receiver's instance variables: bounds: (0@0) corner: (50@40) owner: nil submorphs: #() fullBounds: (0@0) corner: (50@40) color: Color blue extension: a MorphExtension (693370880) session: nil form: nil useOwnForm: nil display: nil d: nil glyphCache: nil font: nil curveRenderer: nil frameStats: nil start: nil frameCount: nil GLTTRenderingDemo class(Behavior)>>new Receiver: GLTTRenderingDemo Arguments and temporary variables: Receiver's instance variables: superclass: GLViewportMorph methodDict: a MethodDictionary(#frameStats->(GLTTRenderingDemo>>#frameStats "a ...etc... format: 164 instanceVariables: #('d' 'glyphCache' 'font' 'curveRenderer' 'frameStats' 'star...etc... organization: ('as yet unclassified' frameStats initialize initializeForNewSess...etc... subclasses: nil name: #GLTTRenderingDemo classPool: nil sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'NBOpenGL-Morphic-Demo' traitComposition: {} localSelectors: nil UndefinedObject>>DoIt Receiver: nil Arguments and temporary variables: Receiver's instance variables: nil Compiler>>evaluate:in:to:notifying:ifFail:logged: Receiver: a Compiler Arguments and temporary variables: textOrStream: a ReadWriteStream aContext: nil receiver: nil aRequestor: a TextMorphForEditView(925892608) failBlock: [self morph flash. ^ nil] logFlag: true methodNode: DoIt ^ GLTTRenderingDemo new openInWorld method: (UndefinedObject>>#DoIt "a CompiledMethod(678166528)") value: nil toLog: nil itsSelection: nil itsSelectionString: nil Receiver's instance variables: sourceStream: a ReadWriteStream requestor: a TextMorphForEditView(925892608) class: UndefinedObject category: nil context: nil parser: a Parser [rcvr class evaluatorClass new evaluate: self selectionForDoitAsStream in: ctxt to: rcvr notifying: self morph ifFail: [self morph flash. ^ nil] logged: true] in SmalltalkEditor>>evaluateSelectionAndDo: Receiver: a SmalltalkEditor Arguments and temporary variables: rcvr: nil ctxt: nil Receiver's instance variables: morph: a TextMorphForEditView(925892608) selectionShowing: true model: a Workspace editingState: a SmalltalkEditingState BlockClosure>>on:do: Receiver: [rcvr class evaluatorClass new evaluate: self selectionForDoitAsStream in: ctxt to: ...etc... Arguments and temporary variables: exception: OutOfScopeNotification handlerAction: [:ex | ex resume: true] handlerActive: true Receiver's instance variables: outerContext: SmalltalkEditor>>evaluateSelectionAndDo: startpc: 110 numArgs: 0 SmalltalkEditor>>evaluateSelectionAndDo: Receiver: a SmalltalkEditor Arguments and temporary variables: aBlock: [:result | result] result: nil rcvr: nil ctxt: nil Receiver's instance variables: morph: a TextMorphForEditView(925892608) selectionShowing: true model: a Workspace editingState: a SmalltalkEditingState SmalltalkEditor>>evaluateSelection Receiver: a SmalltalkEditor Arguments and temporary variables: Receiver's instance variables: morph: a TextMorphForEditView(925892608) selectionShowing: true model: a Workspace editingState: a SmalltalkEditingState SmalltalkEditor>>doIt Receiver: a SmalltalkEditor Arguments and temporary variables: Receiver's instance variables: morph: a TextMorphForEditView(925892608) selectionShowing: true model: a Workspace editingState: a SmalltalkEditingState SmalltalkEditor>>doIt: Receiver: a SmalltalkEditor Arguments and temporary variables: aKeyboardEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: morph: a TextMorphForEditView(925892608) selectionShowing: true model: a Workspace editingState: a SmalltalkEditingState SmalltalkEditor(TextEditor)>>performCmdActionsWith:shifted:return: Receiver: a SmalltalkEditor Arguments and temporary variables: aKeyboardEvent: [keystroke '<Cmd-d>'] aBoolean: false return: [:val | ^ val] asciiValue: 101 actions: #(#noop: #cursorHome: #noop: #noop: #cursorEnd: #noop: #noop: #noop: #...etc... action: #doIt: Receiver's instance variables: morph: a TextMorphForEditView(925892608) selectionShowing: true model: a Workspace editingState: a SmalltalkEditingState SmalltalkEditor(TextEditor)>>dispatchCommandOn:return: Receiver: a SmalltalkEditor Arguments and temporary variables: aKeyboardEvent: [keystroke '<Cmd-d>'] return: [:val | ^ val] asciiValue: 100 honorCommandKeys: true char: nil Receiver's instance variables: morph: a TextMorphForEditView(925892608) selectionShowing: true model: a Workspace editingState: a SmalltalkEditingState SmalltalkEditor(TextEditor)>>dispatchOn: Receiver: a SmalltalkEditor Arguments and temporary variables: aKeyboardEvent: [keystroke '<Cmd-d>'] char: nil return: [:val | ^ val] keyEvents: nil Receiver's instance variables: morph: a TextMorphForEditView(925892608) selectionShowing: true model: a Workspace editingState: a SmalltalkEditingState [self dispatchOn: aKeyboardEvent] in SmalltalkEditor(TextEditor)>>keystroke: Receiver: a SmalltalkEditor Arguments and temporary variables: aKeyboardEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: morph: a TextMorphForEditView(925892608) selectionShowing: true model: a Workspace editingState: a SmalltalkEditingState SmalltalkEditor(TextEditor)>>handleKeystrokeAction: Receiver: a SmalltalkEditor Arguments and temporary variables: aBlock: [self dispatchOn: aKeyboardEvent] Receiver's instance variables: morph: a TextMorphForEditView(925892608) selectionShowing: true model: a Workspace editingState: a SmalltalkEditingState SmalltalkEditor(TextEditor)>>handleEditionAction:fromKeyboardEvent: Receiver: a SmalltalkEditor Arguments and temporary variables: anAction: [self dispatchOn: aKeyboardEvent] aKeyboardEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: morph: a TextMorphForEditView(925892608) selectionShowing: true model: a Workspace editingState: a SmalltalkEditingState SmalltalkEditor(TextEditor)>>keystroke: Receiver: a SmalltalkEditor Arguments and temporary variables: aKeyboardEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: morph: a TextMorphForEditView(925892608) selectionShowing: true model: a Workspace editingState: a SmalltalkEditingState [editor keystroke: evt] in [| action | evt keyValue = 13 ifTrue: [action := self crAction. action ifNotNil: [evt hand newKeyboardFocus: nil. ^ action value]]. self handleInteraction: [editor keystroke: evt]. self updateFromParagraph. super keyStroke: evt] in TextMorphForEditView(TextMorph)>>keyStroke: Receiver: a TextMorphForEditView(925892608) Arguments and temporary variables: evt: [keystroke '<Cmd-d>'] Receiver's instance variables: bounds: (0@0) corner: (681@114) owner: a TransformMorph(623902720) submorphs: #() fullBounds: (0@0) corner: (681@114) color: Color black extension: a MorphExtension (945815552) [other: (blinkStart -> 564954) (myDepe...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for 'Gofer it squeaksource: ''NBOpenGL''; package: ''Configuration...etc... wrapFlag: true paragraph: a Paragraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableTextMorph(171180032) acceptOnCR: false autoAccept: false acceptOnFocusChange: false selectionColor: nil TextMorphForEditView(TextMorph)>>handleInteraction: Receiver: a TextMorphForEditView(925892608) Arguments and temporary variables: interactionBlock: [editor keystroke: evt] oldEditor: a SmalltalkEditor oldParagraph: a Paragraph oldText: a Text for 'Gofer it squeaksource: ''NBOpenGL''; package: ''Configurat...etc... Receiver's instance variables: bounds: (0@0) corner: (681@114) owner: a TransformMorph(623902720) submorphs: #() fullBounds: (0@0) corner: (681@114) color: Color black extension: a MorphExtension (945815552) [other: (blinkStart -> 564954) (myDepe...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for 'Gofer it squeaksource: ''NBOpenGL''; package: ''Configuration...etc... wrapFlag: true paragraph: a Paragraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableTextMorph(171180032) acceptOnCR: false autoAccept: false acceptOnFocusChange: false selectionColor: nil TextMorphForEditView>>handleInteraction: Receiver: a TextMorphForEditView(925892608) Arguments and temporary variables: interActionBlock: [editor keystroke: evt] Receiver's instance variables: bounds: (0@0) corner: (681@114) owner: a TransformMorph(623902720) submorphs: #() fullBounds: (0@0) corner: (681@114) color: Color black extension: a MorphExtension (945815552) [other: (blinkStart -> 564954) (myDepe...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for 'Gofer it squeaksource: ''NBOpenGL''; package: ''Configuration...etc... wrapFlag: true paragraph: a Paragraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableTextMorph(171180032) acceptOnCR: false autoAccept: false acceptOnFocusChange: false selectionColor: nil [| action | evt keyValue = 13 ifTrue: [action := self crAction. action ifNotNil: [evt hand newKeyboardFocus: nil. ^ action value]]. self handleInteraction: [editor keystroke: evt]. self updateFromParagraph. super keyStroke: evt] in TextMorphForEditView(TextMorph)>>keyStroke: Receiver: a TextMorphForEditView(925892608) Arguments and temporary variables: evt: [keystroke '<Cmd-d>'] action: nil Receiver's instance variables: bounds: (0@0) corner: (681@114) owner: a TransformMorph(623902720) submorphs: #() fullBounds: (0@0) corner: (681@114) color: Color black extension: a MorphExtension (945815552) [other: (blinkStart -> 564954) (myDepe...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for 'Gofer it squeaksource: ''NBOpenGL''; package: ''Configuration...etc... wrapFlag: true paragraph: a Paragraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableTextMorph(171180032) acceptOnCR: false autoAccept: false acceptOnFocusChange: false selectionColor: nil ToolRegistry>>codeCompletionAround:textMorph:keyStroke: Receiver: a ToolRegistry Arguments and temporary variables: aBlock: [| action | evt keyValue = 13 ifTrue: [action := self crAction. ac...etc... aTextMorph: a TextMorphForEditView(925892608) evt: [keystroke '<Cmd-d>'] Receiver's instance variables: tools: an IdentityDictionary(#basicInspector->BasicInspector #browser->[self de...etc... inspectorsMap: an IdentityDictionary(#CompiledMethod->#CompiledMethodInspector ...etc... SmalltalkEditor>>codeCompletionAround:textMorph:keyStroke: Receiver: a SmalltalkEditor Arguments and temporary variables: aBlock: [| action | evt keyValue = 13 ifTrue: [action := self crAction. ac...etc... aTextMorph: a TextMorphForEditView(925892608) anEvent: [keystroke '<Cmd-d>'] Receiver's instance variables: morph: a TextMorphForEditView(925892608) selectionShowing: true model: a Workspace editingState: a SmalltalkEditingState TextMorphForEditView(TextMorph)>>keyStroke: Receiver: a TextMorphForEditView(925892608) Arguments and temporary variables: evt: [keystroke '<Cmd-d>'] Receiver's instance variables: bounds: (0@0) corner: (681@114) owner: a TransformMorph(623902720) submorphs: #() fullBounds: (0@0) corner: (681@114) color: Color black extension: a MorphExtension (945815552) [other: (blinkStart -> 564954) (myDepe...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for 'Gofer it squeaksource: ''NBOpenGL''; package: ''Configuration...etc... wrapFlag: true paragraph: a Paragraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableTextMorph(171180032) acceptOnCR: false autoAccept: false acceptOnFocusChange: false selectionColor: nil TextMorphForEditView>>keyStroke: Receiver: a TextMorphForEditView(925892608) Arguments and temporary variables: evt: [keystroke '<Cmd-d>'] view: a PluggableTextMorph(171180032) Receiver's instance variables: bounds: (0@0) corner: (681@114) owner: a TransformMorph(623902720) submorphs: #() fullBounds: (0@0) corner: (681@114) color: Color black extension: a MorphExtension (945815552) [other: (blinkStart -> 564954) (myDepe...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for 'Gofer it squeaksource: ''NBOpenGL''; package: ''Configuration...etc... wrapFlag: true paragraph: a Paragraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableTextMorph(171180032) acceptOnCR: false autoAccept: false acceptOnFocusChange: false selectionColor: nil TextMorphForEditView(TextMorph)>>handleKeystroke: Receiver: a TextMorphForEditView(925892608) Arguments and temporary variables: anEvent: [keystroke '<Cmd-d>'] pasteUp: nil Receiver's instance variables: bounds: (0@0) corner: (681@114) owner: a TransformMorph(623902720) submorphs: #() fullBounds: (0@0) corner: (681@114) color: Color black extension: a MorphExtension (945815552) [other: (blinkStart -> 564954) (myDepe...etc... borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for 'Gofer it squeaksource: ''NBOpenGL''; package: ''Configuration...etc... wrapFlag: true paragraph: a Paragraph editor: a SmalltalkEditor container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editView: a PluggableTextMorph(171180032) acceptOnCR: false autoAccept: false acceptOnFocusChange: false selectionColor: nil --- The full stack --- NBFFICallout(Object)>>error: NBFFICallout>>generateCall:module: [:generator | generator sender: sender; callType: self callType; generateCall: fnSpec module: self moduleName] in NBGlxAPI>>call: NBFFICallout class(NBNativeCodeGen class)>>generateCode:andRetry: NBFFICallout class(NBNativeCodeGen class)>>handleFailureIn:nativeCode: NBGlxAPI>>call: NBGlxAPI>>queryExtension:errorBase:eventBase: NBGLXContextDriver>>createContext: NBGLContextDriver class>>createContext: NBGLDisplay class>>extent: GLTTRenderingDemo(GLViewportMorph)>>initializeForNewSession GLTTRenderingDemo>>initializeForNewSession GLTTRenderingDemo(GLViewportMorph)>>initialize GLTTRenderingDemo>>initialize GLTTRenderingDemo class(Behavior)>>new UndefinedObject>>DoIt Compiler>>evaluate:in:to:notifying:ifFail:logged: [rcvr class evaluatorClass new evaluate: self selectionForDoitAsStream in: ctxt to: rcvr notifying: self morph ifFail: [self morph flash. ^ nil] logged: true] in SmalltalkEditor>>evaluateSelectionAndDo: BlockClosure>>on:do: SmalltalkEditor>>evaluateSelectionAndDo: SmalltalkEditor>>evaluateSelection SmalltalkEditor>>doIt SmalltalkEditor>>doIt: SmalltalkEditor(TextEditor)>>performCmdActionsWith:shifted:return: SmalltalkEditor(TextEditor)>>dispatchCommandOn:return: SmalltalkEditor(TextEditor)>>dispatchOn: [self dispatchOn: aKeyboardEvent] in SmalltalkEditor(TextEditor)>>keystroke: SmalltalkEditor(TextEditor)>>handleKeystrokeAction: SmalltalkEditor(TextEditor)>>handleEditionAction:fromKeyboardEvent: SmalltalkEditor(TextEditor)>>keystroke: [editor keystroke: evt] in [| action | evt keyValue = 13 ifTrue: [action := self crAction. action ifNotNil: [evt hand newKeyboardFocus: nil. ^ action value]]. self handleInteraction: [editor keystroke: evt]. self updateFromParagraph. super keyStroke: evt] in TextMorphForEditView(TextMorph)>>keyStroke: TextMorphForEditView(TextMorph)>>handleInteraction: TextMorphForEditView>>handleInteraction: [| action | evt keyValue = 13 ifTrue: [action := self crAction. action ifNotNil: [evt hand newKeyboardFocus: nil. ^ action value]]. self handleInteraction: [editor keystroke: evt]. self updateFromParagraph. super keyStroke: evt] in TextMorphForEditView(TextMorph)>>keyStroke: ToolRegistry>>codeCompletionAround:textMorph:keyStroke: SmalltalkEditor>>codeCompletionAround:textMorph:keyStroke: TextMorphForEditView(TextMorph)>>keyStroke: TextMorphForEditView>>keyStroke: TextMorphForEditView(TextMorph)>>handleKeystroke: - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - KeyboardEvent>>sentTo: TextMorphForEditView(Morph)>>handleEvent: TextMorphForEditView(Morph)>>handleFocusEvent: [ActiveHand := self. ActiveEvent := anEvent. result := focusHolder handleFocusEvent: (anEvent transformedBy: (focusHolder transformedFrom: self))] in HandMorph>>sendFocusEvent:to:clear: [aBlock value] in PasteUpMorph>>becomeActiveDuring: BlockClosure>>on:do: PasteUpMorph>>becomeActiveDuring: HandMorph>>sendFocusEvent:to:clear: HandMorph>>sendEvent:focus:clear: HandMorph>>sendKeyboardEvent: HandMorph>>handleEvent: HandMorph>>processEvents [:h | ActiveHand := h. h processEvents. ActiveHand := nil] in WorldState>>doOneCycleNowFor: Array(SequenceableCollection)>>do: WorldState>>handsDo: WorldState>>doOneCycleNowFor: WorldState>>doOneCycleFor: PasteUpMorph>>doOneCycle [[World doOneCycle. Processor yield. false] whileFalse. nil] in MorphicUIManager>>spawnNewProcess [self value. Processor terminateActive] in BlockClosure>>newProcess

March 27, 2012

Re: [Pharo-project] how to get a string read stream from filesystem

by Philippe Marschall

On 11/19/2011 03:11 PM, Tudor Girba wrote: > Hi, > > Thanks. I know that the ByteArray is the data structure, but I would like to get a stream that decodes the information and lets me traverse characters, rather than bytes. What information? Which encoding? Cheers Philippe

March 27, 2012

Re: [Pharo-project] Bug in DateAndTime?

by Sean P. DeNigris

Max Leske wrote > > DateAndTime fromUnixTime: <seconds> > > DateAndTime>>fromUnixTime: anInteger > ^ self fromSeconds: anInteger + > 2177452800 "unix epoch constant" > This seems like a bug to me. Wikipedia defines unix epoch time as "the number of seconds elapsed since midnight Coordinated Universal Time (UTC)..." However, #fromSeconds: takes the resulting time and simply tacks on the local offset. For example, it makes 12:02pm+0hrs into 12:02pm-4hrs (for NY). I scraped a unix time from an html page, and put it into Pharo. The unix time was based (correctly as defined above) on UTC, so in this case, it should have done: 12:02pm+0hrs -> 8:02am-4hrs instead of 12:02pm+0hrs -> 12:02pm-4hrs To get the correct result now, one has to jump through hoops like: DateAndTime fromUnixTime: (1332807176 + DateAndTime localOffset asSeconds). or ((DateAndTime fromUnixTime: 1332807176) offset: Duration zero) asLocal Does all this sound right? If so, I'll create an issue for it... Sean -- View this message in context: http://forum.world.st/Bug-in-DateAndTime-tp2293749p4507847.html Sent from the Pharo Smalltalk mailing list archive at Nabble.com.

March 27, 2012

Re: [Pharo-project] how to get a string read stream from filesystem

by Sean P. DeNigris

Lukas Renggli wrote > > As I just wrote a few days ago, you must use... #fileStreamDo: ...to get > the traditional system stream > I just ran into this. To start, how about a comment in #readStream and friends pointing this out? Sean -- View this message in context: http://forum.world.st/how-to-get-a-string-read-stream-from-filesystem-tp408… Sent from the Pharo Smalltalk mailing list archive at Nabble.com.

March 27, 2012

Re: [Pharo-project] Silly question: how to start up pharo on a given image?

by Schwab,Wilhelm K

Stefano, Don't worry about the noise - I'm glad you solved your problem. The following are some things that might help you or others in the future. To run latest versions off of Jenkins on Ubuntu, I just dump the image, changes, and Cog.zip contents into one directory and then have a one-line shell script, something like this: /home/bills/Pharo-1.4/CogVM /home/bills/Pharo-1.4/Seaside.image ------------- vm ---------------------- --------------------- image -------------------- On Ubuntu at least, Cog looks for .so love in all the wrong places. The "best" solution I have found (it's ugly) is to create sim links (in the common folder, to wherever the library might be) to each library I want Cog to be able to see. I have a plain text file called links.txt to help me. The first few lines are ln -s /usr/lib/libplplotd.so.9 ./libplplotd.so.9 ln -s /usr/lib/libAccesIO-USB.so ./libAccesIO-USB.so ln -s /lib/libc.so.6 ./libc.so.6 Faced with a new machine, I can simply issue these commands in a terminal to make the libraries visible. AFAIK, what Cog should be doing (at least as a first attempt to find a library) is to look for the library as named in #moduleName. Ubuntu ties its dynamic loading of libraries to ldconfig's "database," which anyone can read and only sudo can modify. It is s a clever approach to the problem. For example, on my machine, running ldconfig -p | grep libplplotd.so.9 returns libplplotd.so.9 (libc6) => /usr/lib/libplplotd.so.9 Asking to load libplplotd.so.9 will cause the system to load /usr/lib/libplplotd.so.9. That is simply reading the map, which does not require root access. If you want to add a library, you would either use ldconf.d or simply place the library in usr/lib and then run (as sudo) ldconfig, which scans the default locations and ldconfig.d scripts to rebuild the database. Right or wrong, this approach seems to work for me. Bill ________________________________________ From: pharo-project-bounces(a)lists.gforge.inria.fr [pharo-project-bounces(a)lists.gforge.inria.fr] on behalf of stefano franchi [stefano.franchi(a)gmail.com] Sent: Monday, March 26, 2012 6:35 PM To: pharo-project(a)lists.gforge.inria.fr Subject: Re: [Pharo-project] Silly question: how to start up pharo on a given image? Ok, it was silly. Looking at the pharo.sh script made it clear. Sorry for the noise. Cheers, Stefano On Mon, Mar 26, 2012 at 5:13 PM, stefano franchi <stefano.franchi(a)gmail.com> wrote: > Dear all, > > this may be a silly question, but I can't find the answer in the pharo > book or on the list: > > how do you start pharo on a specific image? in Visualworks, you'd do > > $vw imagename > > and from then on, the image and change file would be saved in > imagename's directory. > > But in pharo, it seems the imagename I give on the command line is > ignored, and I always start with the default image (which, on my > archlinux system, is located at /usr/share/pharo). > Since that directory is not writable by default and it contains the > change file, I get all sort of errors. > Perhaps it is an installation issue? > > Cheers, > > Stefano > > > -- > __________________________________________________ > Stefano Franchi > Associate Research Professor > Department of Hispanic Studies Ph: +1 (979) 845-2125 > Texas A&M University Fax: +1 (979) 845-6421 > College Station, Texas, USA > > stefano(a)tamu.edu > http://stefano.cleinias.org -- __________________________________________________ Stefano Franchi Associate Research Professor Department of Hispanic Studies Ph: +1 (979) 845-2125 Texas A&M University Fax: +1 (979) 845-6421 College Station, Texas, USA stefano(a)tamu.edu http://stefano.cleinias.org

March 27, 2012

Re: [Pharo-project] Silly question: how to start up pharo on a given image?

by stefano franchi

Ok, it was silly. Looking at the pharo.sh script made it clear. Sorry for the noise. Cheers, Stefano On Mon, Mar 26, 2012 at 5:13 PM, stefano franchi <stefano.franchi(a)gmail.com> wrote: > Dear all, > > this may be a silly question, but I can't find the answer in the pharo > book or on the list: > > how do you start pharo on a specific image? in Visualworks, you'd do > > $vw imagename > > and from then on, the image and change file would be saved in > imagename's directory. > > But in pharo, it seems the imagename I give on the command line is > ignored, and I always start with the default image (which, on my > archlinux system, is located at /usr/share/pharo). > Since that directory is not writable by default and it contains the > change file, I get all sort of errors. > Perhaps it is an installation issue? > > Cheers, > > Stefano > > > -- > __________________________________________________ > Stefano Franchi > Associate Research Professor > Department of Hispanic Studies Â Â Â Â Â Â Ph:Â Â +1 (979) 845-2125 > Texas A&M UniversityÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Fax: Â +1 (979) 845-6421 > College Station, Texas, USA > > stefano(a)tamu.edu > http://stefano.cleinias.org -- __________________________________________________ Stefano Franchi Associate Research Professor Department of Hispanic Studies Â Â Â Â Â Â Ph:Â Â +1 (979) 845-2125 Texas A&M UniversityÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Fax: Â +1 (979) 845-6421 College Station, Texas, USA stefano(a)tamu.edu http://stefano.cleinias.org

March 26, 2012

[Pharo-project] Silly question: how to start up pharo on a given image?

by stefano franchi

Dear all, this may be a silly question, but I can't find the answer in the pharo book or on the list: how do you start pharo on a specific image? in Visualworks, you'd do $vw imagename and from then on, the image and change file would be saved in imagename's directory. But in pharo, it seems the imagename I give on the command line is ignored, and I always start with the default image (which, on my archlinux system, is located at /usr/share/pharo). Since that directory is not writable by default and it contains the change file, I get all sort of errors. Perhaps it is an installation issue? Cheers, Stefano -- __________________________________________________ Stefano Franchi Associate Research Professor Department of Hispanic Studies Â Â Â Â Â Â Ph:Â Â +1 (979) 845-2125 Texas A&M UniversityÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Fax: Â +1 (979) 845-6421 College Station, Texas, USA stefano(a)tamu.edu http://stefano.cleinias.org

March 26, 2012