Squeak-dev July 2009

squeak-dev@lists.squeakfoundation.org

126 participants
195 discussions

dummyReferToProxy
by Ang Beepeng 30 Jul '09

30 Jul '09

I see this in SqueakVM souce, interp.c. sqInt dummyReferToProxy(void) { interpreterProxy = interpreterProxy; } It looks strange to me. Can someone give me a clue? Thanks. Ang Beepeng -- View this message in context: http://www.nabble.com/dummyReferToProxy-tp24733239p24733239.html Sent from the Squeak - Dev mailing list archive at Nabble.com.

3 2

FloatTest >> testNaN5
by Michael Haupt 30 Jul '09

30 Jul '09

Hi, working on the trunk, I want to tackle some of the failing test cases to make that bar green. ;-) FloatTest >> testNaN5 fails because the expression Float nan asIEEE32BitWord printPaddedWith: $0 to: 32 base: 2 yields '11111111110000000000000000000000', but '01111111110000000000000000000000' (note the difference in the first character) is expected. Looking at IEEE 754, it seems that, for NaN, that very bit may either be 0 or 1 - so both would be correct. In that case, the test itself would be wrong. I'd simply change it, but there should be agreement on whether the standard is interpreted correctly. Comments? Best, Michael

3 5

Contents of Transcript
by Guillaume Grondin 30 Jul '09

30 Jul '09

Hi, I would like to fileout the content of Transcript. But it doesn't seem to be possible because "Squeak Transcript (different from VW Transcript) is the stream of not yet appened text" (nicolas cellier). (How about pharo ?) One solution seems to be to add a dependent to Transcript and log stuff on "updated: #appendEntry". Is there a more practical solution ? Regards, Guillaume Grondin previous discussion on this matter : http://marc.info/?l=squeak-dev&m=119282200100489&w=2 http://aspn.activestate.com/ASPN/Mail/Message/squeak-list/2498160 > On Saturday 20 October 2007 3:00 am, nicolas cellier wrote: > >> Transcript must now be viewed as a TranscriptingService you'll have to >> subscribe to... For that reason I would rather call it a Subscript! -- Guillaume GRONDIN (Dr) Ph.D in Computer Science =========================================== Ecole des Mines de Douai - Dept. I.A. 941, rue Charles Bourseul BP 10838 - 59508 Douai Cedex, France Tél : (+33) (0) 3 27 71 24 53 Fax : (+33) (0) 3 27 71 29 17 Email: grondin(a)ensm-douai.fr http://vst.ensm-douai.fr/grondin

1 0

Minimal window manager
by Gary Dunn 29 Jul '09

29 Jul '09

Today it occurred to me that Alan Kay intended Squeak to be UI for the Dynabook. I run Squeak on Gnome on FreeBSD, so just for fun I disabled Gnome and started a plain X session using twm, and from an xterm I launched Squeak. It looked just like it does in Gnome. The only difference I detected in this simple test was that pop-up menus opened slower. Has anyone tried running Squeak from X without a window manager per se? I could test it by writing a .xinitrc file but I don't know how badly this could turn out. If it turns out that Squeak needs a window manager, which of the simple window managers work well? -- Gary Dunn, Honolulu osp(a)aloha.com http://openslate.net/ http://e9erust.blogspot.com/ Sent from Slate001

7 6

Spell Check
by Gary Dunn 29 Jul '09

29 Jul '09

Is there a spell checker for text morphs? If not, has anyone tried implementing aspell? (http:/aspell.net) -- Gary Dunn, Honolulu osp(a)aloha.com http://openslate.net/ http://e9erust.blogspot.com/ Sent from a Newton 2100 via Mail V

5 6

Where is VM_NAME set in Squeak VM source code?
by Ang Beepeng 29 Jul '09

29 Jul '09

Where is VM_NAME set in Squeak VM source code? Thanks. Ang Beepeng -- View this message in context: http://www.nabble.com/Where-is-VM_NAME-set-in-Squeak-VM-source-code--tp2471… Sent from the Squeak - Dev mailing list archive at Nabble.com.

2 1

What command line can Squeak.exe take?
by Ang Beepeng 29 Jul '09

29 Jul '09

What command line can Squeak.exe take? Thanks. Ang Beepeng -- View this message in context: http://www.nabble.com/What-command-line-can-Squeak.exe-take--tp24711738p247… Sent from the Squeak - Dev mailing list archive at Nabble.com.

2 1

Communication medium - Why not use/anticipate wave tools ?
by Cédrick Béler 28 Jul '09

28 Jul '09

Hi, Just got a wavesanbox[1] account and I can't help thinking this would be a good (global?) comunication medium (enriched emails, mailing-lists, tutorials, technical discussions and also bug tracker...). What do other think ? Could we create a Smalltalk related waves/groups as a start ? And what about having bindings and a protocol implementation in Smalltalk ? Cheers, -- Cédrick (cdrick(a)wavesandbox.com) [1] wave is a new tool from google aiming at redefining emails and instant messages (based on waveprotocol)... The application proposed is epecially interesting (to me) in its collaborative creation/edition of "waves". Video: http://www.youtube.com/watch?v=v_UyVmITiYQ

5 6

Bug in SortedCollection
by Ricardo Moran 28 Jul '09

28 Jul '09

Hi, today I found this: a := Object new -> 1. b := Object new -> 2. c := Object new -> 3. d := Object new -> 4. ss := {a. b. c.} asSortedCollection: [:a :b | a value < b value]. So far, it evaluates nicely, but when I try to do the following ss , {d} I get: Object doesNotUnderstand: < Perhaps this is something you don't usually do with SortedCollections but I don't know. I believe the problem is that OrderedCollection's implementation of #copyReplaceFrom:to:with: creates a new collection without passing it the sortBlock. It can be easily fixed by overriding this method in SortedCollection and duplicating the code but I think it's ugly. What do you think?

2 2

strange bug
by Ralph Boland 28 Jul '09

28 Jul '09

I have a strange but that I don't know what to do with. Any suggestions on how to proceed most welcome. The bug occurs when I stop after a halt during a printOn: (The code prevents the halt occurring a second time to prevent infinite recursion during printing. I need to do this to track down an unrelated bug in a different tree printing class than the one described below. I have some code that builds/stores a tree. The tree is complicated and I need to be able to print the tree different ways so the tree object has an instance variable "printer" that stores an object that knows how to print the tree. If no printer is stored then a default printer object is created to print the tree. The printOn: method for my tree class is as follows: printOn: aStream (printer) ifNil: [HeapTreePrinterNumbered printTree: self on: aStream] ifNotNil: [printer printOn: aStream]. Here's the printTree:on: method: printTree: heapTree on: aStream | aMe | aMe := self new: heapTree. aMe printOn: aStream. The printOn: method for HeapTreePrinterNumbered is as follows: printOn: aStream | a b | a := a. "2 dummy statements to see if it had any affect. It didn't." b := b. stream := aStream. self chkHalt. "halts first time through only" self printTree. stream := nil. Based on the above code one would expect that it doesn't matter whether my tree stores a HeapTreePrinterNumbered object or nil in its printer instance variable when I attempt to print my tree. However, if I go the default printer route then my code works as expected while if I install a HeapTreePrinterNumbered object into my tree odd things happen. In the latter case, I get the halt caused by the "self chkHalt" invocation as expected. But when I run the code "stream == aStream" false is returned??????????? Note that the printOn: is the only place where instance var 'stream' is assigned. In fact stream contains part or all of the data that will be placed in it by the "self printTree" code even though that code hasn't been invoked yet!!!! If I select self from the debugger the tree is displayed properly. If I then select stream again nil is displayed. (As it should because the printOn: has been invoked again which, of course, set stream to nil as it last act. (after properly displaying the tree)) If instead, after hitting the halt, I do a restart from the printOn: and single step through then the code "stream := aStream" works as expected. In instead, after hitting the halt, I do a continue I get the stack: BlockContext>>cannotReturn: [] in String class(SequenceableCollection class)>>streamContents:limitedTo: {[^ stream contents]} LimitedWriteStream>>nextPut: LimitedWriteStream(WriteStream)>>cr - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - HeapTreePrinterNumbered(HeapTreePrinter)>>printTree HeapTreePrinterNumbered(HeapTreePrinterAbstract)>>printOn: CrossLinkedHeapTree>>printOn: [] in CrossLinkedHeapTree(Object)>>printStringLimitedTo: {[:s | self printOn: s]} String class(SequenceableCollection class)>>streamContents:limitedTo: CrossLinkedHeapTree(Object)>>printStringLimitedTo: CrossLinkedHeapTree(Object)>>printString TextMorphEditor(ParagraphEditor)>>printIt [] in TextMorphEditor(ParagraphEditor)>>printIt: {[self printIt]} TextMorphEditor(Controller)>>terminateAndInitializeAround: TextMorphEditor(ParagraphEditor)>>printIt: TextMorphEditor(ParagraphEditor)>>dispatchOnCharacter:with: TextMorphEditor>>dispatchOnCharacter:with: TextMorphEditor(ParagraphEditor)>>readKeyboard TextMorphEditor>>readKeyboard [] in TextMorphForEditView(TextMorph)>>keyStroke: {[editor readKeyboard]} TextMorphForEditView(TextMorph)>>handleInteraction:fromEvent: TextMorphForEditView>>handleInteraction:fromEvent: TextMorphForEditView(TextMorph)>>keyStroke: TextMorphForEditView>>keyStroke: TextMorphForEditView(TextMorph)>>handleKeystroke: KeyboardEvent>>sentTo: TextMorphForEditView(Morph)>>handleEvent: TextMorphForEditView(Morph)>>handleFocusEvent: [] in HandMorph>>sendFocusEvent:to:clear: {[ActiveHand := self. ActiveEvent := anEvent. result := focusHolder han...]} [] in PasteUpMorph>>becomeActiveDuring: {[aBlock value]} BlockContext>>on:do: PasteUpMorph>>becomeActiveDuring: HandMorph>>sendFocusEvent:to:clear: HandMorph>>sendEvent:focus:clear: HandMorph>>sendKeyboardEvent: HandMorph>>handleEvent: HandMorph>>processEvents [] in WorldState>>doOneCycleNowFor: {[:h | ActiveHand := h. h processEvents. capturingGesture := capturingGest...]} Array(SequenceableCollection)>>do: WorldState>>handsDo: WorldState>>doOneCycleNowFor: WorldState>>doOneCycleFor: PasteUpMorph>>doOneCycle [] in Project class>>spawnNewProcess {[[World doOneCycle. Processor yield. false] whileFalse. nil]} ...etc... Again, any suggestions most welcome. Ralph Boland

1 0

Jump to page: