Allow any expression as the stop value for a loop
This commit is contained in:
parent
2a3db7876f
commit
3281ec3dd9
1 changed files with 1 additions and 1 deletions
|
@ -281,7 +281,7 @@ comma ',' is required to separate arguments.")))
|
|||
(make-instance 'node-dotimes
|
||||
:source *syntax-source*
|
||||
:counter-ref (transform var 'reference-variable)
|
||||
:stop-ref (transform n 'reference)
|
||||
:stop-ref n
|
||||
:loopee-node (transform code 'node)))
|
||||
|
||||
(define-syntax-matcher if (test then else)
|
||||
|
|
Loading…
Add table
Reference in a new issue