[Cuis-dev] New to Cuis and a question

ken.dickey at whidbey.com ken.dickey at whidbey.com
Fri Mar 20 06:50:58 PDT 2026


On 2026-03-20 05:46, Stephen Pair via Cuis-dev wrote:

> I've recently come back to Smalltalk after about a 15 year absence to work on a personal project.  I've been really impressed with Cuis Smalltalk.  I love the goal of maintaining a simple and powerful implementation of Smalltalk. 
> 
> Question:  Is there any plan to migrate to full block closures (as found in Squeak) in Cuis in the future? 
> 
> Thanks, 
> Stephen

Already there. 

I use Continuation Passing Style, e.g. to animate card moves. 

Feature require: 'Morphic-Games-Solitaire'. 

===== 

CardTableMorph>>
slide: aMorph to: endPoint nSteps: numSteps delay: milliSecondsDelay
next: nextAction
"Slide from current to new position -- in owner's coordinates"
"Nota Bene: Asynchronous. When complete, nextAction value" 

| startPoint delta stepCount |
startPoint _ aMorph morphPosition.
delta _ (endPoint - startPoint) / numSteps.
stepCount := 0.
aMorph when: #morphicStep 
evaluate: [ :ignoredArgument |
stepCount := stepCount + 1.
(stepCount < numSteps)
ifTrue: [ 
aMorph morphPosition: (startPoint + (stepCount * delta)) rounded; 
redrawNeeded 
]
ifFalse: [ "done"
aMorph stopStepping.
aMorph morphPosition: endPoint.
aMorph removeActionsForEvent: #morphicStep.
nextAction value
]
].
aMorph startSteppingStepTime: milliSecondsDelay!
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.cuis.st/mailman/archives/cuis-dev/attachments/20260320/db910e8b/attachment.htm>


More information about the Cuis-dev mailing list