Squeak-dev July 2010

squeak-dev@lists.squeakfoundation.org

75 participants
234 discussions

Start a nNew thread

testPost
by Travis Griggs 24 Jul '10

24 Jul '10

self assert: 'That this comes back to me' -- Travis Griggs Objologist "I choose. Therefore, I Am"

1 0

Re: The Trunk: Kernel-eem.474.mcz
by Andreas Raab 23 Jul '10

23 Jul '10

On 7/22/2010 8:42 PM, commits(a)source.squeak.org wrote: > Eliot Miranda uploaded a new version of Kernel to project The Trunk: > http://source.squeak.org/trunk/Kernel-eem.474.mcz > > ==================== Summary ==================== > > Name: Kernel-eem.474 > Author: eem > Time: 22 July 2010, 1:42:05.4 pm > UUID: 292f2cc5-ba81-4d03-a64f-4e7cb878d68f > Ancestors: Kernel-eem.473 > > BlockClosure>>#once Travis Griggs' neat idiom for interning values of computations. Use e.g. as in > myResourceMethod > ^[time-consuming computation] once > What am I missing? Object compile: 'onceTest "Just once please" ^[Transcript cr; show: ''only once''] once'. #(1 2 3) collect: #onceTest. Cheers, - Andreas

7 12

Re: [squeak-dev] The Trunk: Kernel-eem.474.mcz
by Frank Shearar 23 Jul '10

23 Jul '10

On 2010/07/22 20:42, commits(a)source.squeak.org wrote: > Eliot Miranda uploaded a new version of Kernel to project The Trunk: > http://source.squeak.org/trunk/Kernel-eem.474.mcz > > ==================== Summary ==================== > > Name: Kernel-eem.474 > Author: eem > Time: 22 July 2010, 1:42:05.4 pm > UUID: 292f2cc5-ba81-4d03-a64f-4e7cb878d68f > Ancestors: Kernel-eem.473 > > BlockClosure>>#once Travis Griggs' neat idiom for interning values of computations. Use e.g. as in > myResourceMethod > ^[time-consuming computation] once So if I understand correctly, this allows a block to memoize itself but also, unlike most memoization schemes, also allows us to UNmemoize the block? That's a pretty neat trick! frank

1 0

Re: Fwd: RE: Where is Seaside download???
by Chris Cunnington 23 Jul '10

23 Jul '10

The new image looks great. I think it hits all the right notes. I'll add a link to the Documentation/Instructions part of squeak.org tomorrow, as seaside.st is already pointing to that area. We can add other links on squeak.org as well. Chris

2 2

The Trunk: ToolBuilder-Morphic-ar.66.mcz
by commits＠source.squeak.org 23 Jul '10

23 Jul '10

Andreas Raab uploaded a new version of ToolBuilder-Morphic to project The Trunk: http://source.squeak.org/trunk/ToolBuilder-Morphic-ar.66.mcz ==================== Summary ==================== Name: ToolBuilder-Morphic-ar.66 Author: ar Time: 22 July 2010, 8:00:14.791 pm UUID: d8c9f589-e7d0-5349-9e38-b4c06f023b3f Ancestors: ToolBuilder-Morphic-eem.65 Fix UIManager>>edit:label:accept: to not evaluate the accept block initially. =============== Diff against ToolBuilder-Morphic-eem.65 =============== Item was changed: ----- Method: MorphicUIManager>>edit:label:accept: (in category 'ui requests') ----- edit: aText label: labelString accept: anAction "Open an editor on the given string/text" | window | window := Workspace open. labelString ifNotNil: [ window setLabel: labelString ]. "By default, don't style in UIManager edit: requests" window model shouldStyle: false; + acceptContents: aText; + acceptAction: anAction. - acceptAction: anAction; - acceptContents: aText. ^window.!

1 0

The Trunk: Tests-ar.88.mcz
by commits＠source.squeak.org 23 Jul '10

23 Jul '10

Andreas Raab uploaded a new version of Tests to project The Trunk: http://source.squeak.org/trunk/Tests-ar.88.mcz ==================== Summary ==================== Name: Tests-ar.88 Author: ar Time: 22 July 2010, 7:58:08.503 pm UUID: 7a106762-fe28-7d4c-86a6-921c4a812193 Ancestors: Tests-ar.87 Add a test documenting an bug in UIManager>>edit:label:accept: which would evaluate the accept block initially. =============== Diff against Tests-ar.87 =============== Item was added: + ----- Method: MorphicUIBugTest>>testUIManagerNoAcceptInitially (in category 'as yet unclassified') ----- + testUIManagerNoAcceptInitially + "Ensure that UIManager does not invoke the accept: action initially." + + | accepted window | + accepted := false. + window := UIManager default edit: Text new label: 'Test' accept: [:val| accepted := true]. + window delete. + self deny: accepted.!

1 0

The Trunk: System-eem.353.mcz
by commits＠source.squeak.org 23 Jul '10

23 Jul '10

Eliot Miranda uploaded a new version of System to project The Trunk: http://source.squeak.org/trunk/System-eem.353.mcz ==================== Summary ==================== Name: System-eem.353 Author: eem Time: 22 July 2010, 5:53:14.999 pm UUID: 6757175d-0063-4089-916c-4dfc0cc425c7 Ancestors: System-ar.352 Some Cog-specific VM attribute accessors for process preemption, flagging of interpreted methods and whether Process has a threadId inst var. =============== Diff against System-ar.352 =============== Item was added: + ----- Method: SmalltalkImage>>processHasThreadIdInstVar: (in category 'system attributes') ----- + processHasThreadIdInstVar: aBoolean + "The threaded VM needs to know if the 4th inst var of Process + is threadId which it uses to control process-to-thread binding. + This flag persists across snapshots, stored in the image header." + aBoolean ifTrue: [self assert: (Process instVarNames at: 4) ='threadId']. + self vmParameterAt: 48 put: ((self vmParameterAt: 48) bitClear: 1) + (aBoolean ifTrue: [1] ifFalse: [0])! Item was added: + ----- Method: SmalltalkImage>>processPreemptionYields (in category 'system attributes') ----- + processPreemptionYields + "Answer whether the VM causes a process to yield on process preemption, + i.e. to put a preempted process at the back of its run queue. If the parameter + is unavailable (non-Cog VMs) or bit 2 (4) is 0 then preemption yields." + + ^(([self vmParameterAt: 48] + on: Error + do: [:ex| ^true]) allMask: 4) not! Item was added: + ----- Method: SmalltalkImage>>processPreemptionYields: (in category 'system attributes') ----- + processPreemptionYields: aBoolean + "The Cog VM can be instructed not to yield on process preemption, + i.e. not to put a preempted process at the back of its run queue. By + default preempting a process causes it to yield (Blue Book semantics) + which can have unfortunate effects. + This flag persists across snapshots, stored in the image header." + + self vmParameterAt: 48 put: ((self vmParameterAt: 48) bitClear: 4) + (aBoolean ifTrue: [0] ifFalse: [4])! Item was added: + ----- Method: SmalltalkImage>>flagInterpretedMethods: (in category 'system attributes') ----- + flagInterpretedMethods: aBoolean + "The Cog VM can be instructed to set the flag bit of CompiledMethods that + it executes but will only interpret. This can be used e.g. to profile startup. + See CompiledMethod>>#flag & CompiledMethod>>#clearFlag. + This flag persists across snapshots, stored in the image header." + + self vmParameterAt: 48 put: ((self vmParameterAt: 48) bitClear: 2) + (aBoolean ifTrue: [2] ifFalse: [0])!

1 0

Daily Commit Log
by commits＠source.squeak.org 23 Jul '10

23 Jul '10

Changes to Trunk (http://source.squeak.org/trunk.html) in the last 24 hours: http://lists.squeakfoundation.org/pipermail/packages/2010-July/003549.html Name: Morphic-ul.454 Ancestors: Morphic-cmm.453 Updated an example in the class comment of SimpleButtonMorph to send #beep to Beeper instead of Smalltalk which doesn't work. Thanks to Enrico Spinielli for the report. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2010-July/003550.html Name: Tools-ul.254 Ancestors: Tools-eem.253, Tools-topa.246 Merged. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2010-July/003551.html Name: Tools-topa.246 Ancestors: Tools-cmm.245 There is a check for possibly corrupt sources when viewing a message. Now, this allows for different parser classes for the selected class used in the metaclass and the non-metaclass. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2010-July/003552.html Name: Graphics-ar.144 Ancestors: Graphics-nice.143 Point>>basicType should be in *Etoys with all the other implementations of #basicType. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2010-July/003553.html Name: KernelTests-ar.155 Ancestors: KernelTests-ul.154 Move tests with Etoys dependencies to Etoys. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2010-July/003554.html Name: Morphic-ar.455 Ancestors: Morphic-ul.454 Move a method from Etoys to Morphic since it should be in Morphic. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2010-July/003555.html Name: MorphicTests-ar.17 Ancestors: MorphicTests-cmm.16 Move tests with Etoys depencies to Etoys. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2010-July/003556.html Name: Sound-ar.19 Ancestors: Sound-wiz.18 Avoid an unnecessary dependency of the Sound package from Etoys. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2010-July/003557.html Name: EToys-ar.71 Ancestors: EToys-nice.70 Shuffle various methods to avoid unnecessary dependencies between packages. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2010-July/003558.html Name: Monticello-ar.397 Ancestors: Monticello-eem.396 More robust handling of HTTP upload responses. WebDAV for example returns a 204 (no content) after an upload. Enumerating all possible responses of the server really isn't going to cut it, so parse the response instead. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2010-July/003559.html Name: System-ar.351 Ancestors: System-eem.350 Add Preferences>>restoreFontsAfter: to restore the fonts after tests that modify the user-selected set of fonts. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2010-July/003560.html Name: Tests-ar.87 Ancestors: Tests-eem.86 Make sure we #restoreFontsAfter: running tests that modify the standard fonts. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2010-July/003561.html Name: System-ar.352 Ancestors: System-ar.351 Only enable #narrowScrollBars when #tinyDisplay is set. Otherwise leave it at the regular size. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2010-July/003562.html Name: Kernel-eem.474 Ancestors: Kernel-eem.473 BlockClosure>>#once Travis Griggs' neat idiom for interning values of computations. Use e.g. as in myResourceMethod ^[time-consuming computation] once =============================================

1 0

Squeak devices and applications
by Torsten Bergmann 22 Jul '10

22 Jul '10

Just read the post from Hilaire about Pharo on OLPC [1]. This leads to the following interesting question: What is the most crazy device Squeak VM is running on? What is the most interesting application where nobody would have expected Squeak/Pharo/Cuis? Feel free to answer by posting screenshots/pictures even if you think the device/app is boring. Would be nice to know and we can collect these to do a little bit of advertising on the Squeak/Pharo web pages... Bye T. [1] http://blog.ofset.org/hilaire/index.php?post/2010/07/20/Pharo-Smalltalk-on-… -- Neu: GMX De-Mail - Einfach wie E-Mail, sicher wie ein Brief! Jetzt De-Mail-Adresse reservieren: http://portal.gmx.net/de/go/demail

3 2

The Trunk: Kernel-eem.474.mcz
by commits＠source.squeak.org 22 Jul '10

22 Jul '10

Eliot Miranda uploaded a new version of Kernel to project The Trunk: http://source.squeak.org/trunk/Kernel-eem.474.mcz ==================== Summary ==================== Name: Kernel-eem.474 Author: eem Time: 22 July 2010, 1:42:05.4 pm UUID: 292f2cc5-ba81-4d03-a64f-4e7cb878d68f Ancestors: Kernel-eem.473 BlockClosure>>#once Travis Griggs' neat idiom for interning values of computations. Use e.g. as in myResourceMethod ^[time-consuming computation] once =============== Diff against Kernel-eem.473 =============== Item was added: + ----- Method: CachedBlockClosure>>value (in category 'evaluating') ----- + value + ^cachedValue! Item was added: + ----- Method: BlockClosure>>becomeUncached (in category 'private') ----- + becomeUncached + "The receiver is already uncached." + ^self! Item was added: + ----- Method: CachedBlockClosure>>becomeCached (in category 'private') ----- + becomeCached + "The receiver is already cached." + ^self! Item was added: + ----- Method: BlockClosure>>becomeCached (in category 'private') ----- + becomeCached + self become: ((CachedBlockClosure new: self size) + outerContext: outerContext + startpc: startpc + numArgs: numArgs + cachedValue: self value + copiedValues: self)! Item was added: + BlockClosure variableSubclass: #CachedBlockClosure + instanceVariableNames: 'cachedValue' + classVariableNames: '' + poolDictionaries: '' + category: 'Kernel-Methods'! + + !CachedBlockClosure commentStamp: 'eem 7/22/2010 12:34' prior: 0! + I'm a BlockClosure with an added instance variable for storing the once upon a time result of evaluating myself when I was simple BlockClosure. This is triggered by sending #once to a normal BlockClosure. Future sends of once will simply return this value rather than evaluate myself. When sent value, I revert back to a BlockClosure. Originally by Travis Griggs, from whom we copy this idea with thanks. + + Instance Variables + cachedValue <Object> + + cachedValue + - result of having sent value to myself when i was just a BlockClosure! Item was added: + ----- Method: CachedBlockClosure>>once (in category 'evaluating') ----- + once + ^cachedValue! Item was added: + ----- Method: CachedBlockClosure>>outerContext:startpc:numArgs:cachedValue:copiedValues: (in category 'initialize-release') ----- + outerContext: aContext startpc: aStartpc numArgs: argCount cachedValue: aValue copiedValues: anArrayOrNil + cachedValue := aValue. + super outerContext: aContext startpc: aStartpc numArgs: argCount copiedValues: anArrayOrNil! Item was added: + ----- Method: CachedBlockClosure>>becomeUncached (in category 'private') ----- + becomeUncached + self become: (BlockClosure + outerContext: outerContext + startpc: startpc + numArgs: numArgs + copiedValues: self)! Item was added: + ----- Method: BlockClosure>>once (in category 'evaluating') ----- + once + "Answer and remember my value, answering exactly the same object in any further sends + of once or value until I become uncached. This allows one to intern values with the idiom + myResourceMethod + ^[expression] once. + The expression will be evaluated once and its result returned for any subsequent evaluations. + Originally by Travis Griggs, from whom we copy this idea with thanks." + numArgs ~= 0 ifTrue: + [self error: 'once should only be used with niladic blocks']. + self becomeCached. + ^self once!

1 0

← Newer
1
...
5
6
7
8
9
10
11
...
24
Older →

Jump to page: