Fixed let-optionals* in structure slow-simple-let-opt which caused the
macro to loop endlessly
This commit is contained in:
parent
6dcdd107e0
commit
a1b0768745
|
@ -521,7 +521,7 @@
|
|||
(syntax-rules ()
|
||||
((let-optionals* arg (opt-clause ...) body ...)
|
||||
(let ((rest arg))
|
||||
(let-optionals* rest (opt-clause ...) body ...)))))
|
||||
(%let-optionals* rest (opt-clause ...) body ...)))))
|
||||
|
||||
;;; The arg-list expression *must* be a variable.
|
||||
;;; (Or must be side-effect-free, in any event.)
|
||||
|
|
Loading…
Reference in New Issue