From d262f95544722f3edcc245d98b772e9254d6b5d1 Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Sun, 13 Oct 2019 19:51:22 -0700
Subject: eval: bugfix: don't pass eval env to macroexpand.

* eval.c (eval_intrinsic): macroexpand must be called with the
nil environment. If we had a macro env parameter, we could
pass that. In any case, we mustn't pass an eval environment to
the expander.
---
 eval.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/eval.c b/eval.c
index e01c41e1..747fd74a 100644
--- a/eval.c
+++ b/eval.c
@@ -1450,7 +1450,7 @@ static val macroexpand(val form, val menv);
 
 val eval_intrinsic(val form, val env)
 {
-  val form_ex = macroexpand(form, env);
+  val form_ex = macroexpand(form, nil);
   val op;
 
   if (consp(form_ex) &&
-- 
cgit v1.2.3