[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