Stacken/c64-livecoding
6
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Allow any expression as the stop value for a loop

Browse source
This commit is contained in:
John Lorentzson 2025-08-01 11:38:55 +02:00
parent 2a3db7876f
commit 3281ec3dd9
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
user-side-compiler/parser.lisp
View file

@ -281,7 +281,7 @@ comma ',' is required to separate arguments.")))
(make-instance 'node-dotimes (make-instance 'node-dotimes
:source *syntax-source* :source *syntax-source*
:counter-ref (transform var 'reference-variable) :counter-ref (transform var 'reference-variable)
:stop-ref (transform n 'reference) :stop-ref n
:loopee-node (transform code 'node))) :loopee-node (transform code 'node)))
(define-syntax-matcher if (test then else) (define-syntax-matcher if (test then else)