fix a scope bug in <eval>

parent b65c11f4
......@@ -36,8 +36,10 @@
(syntax-rules ()
((_ (v ...) code fini cc)
(let ((v (u-var!)) ...)
(parse<> (fini last fini cc)
code)))))
(let ((fi fini)
(c cc))
(parse<> (fi last fi c)
code))))))
(define-syntax <run>
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment