* eval.c (expand_vars): Bugfix: use expand_forms rather than

expand on a list of forms.

2 files changed, 6 insertions, 1 deletions

diff --git a/ChangeLog b/ChangeLog
index 0a135062..9bb2214c 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,10 @@
 2011-12-16  Kaz Kylheku  <kaz@kylheku.com>
 
+	* eval.c (expand_vars): Bugfix: use expand_forms rather than
+	expand on a list of forms.
+
+2011-12-16  Kaz Kylheku  <kaz@kylheku.com>
+
 	* txr.vim: iskeyword updated.
 
 2011-12-15  Kaz Kylheku  <kaz@kylheku.com>
diff --git a/eval.c b/eval.c
index e78f4051..d5c67a22 100644
--- a/eval.c
+++ b/eval.c
@@ -848,7 +848,7 @@ static val expand_vars(val vars)
   } else {
     cons_bind (var, init, car(vars));
     val rest_vars = rest(vars);
-    val init_ex = expand(init);
+    val init_ex = expand_forms(init);
     val rest_vars_ex = expand_vars(rest_vars);
 
     if (init == init_ex && rest_vars == rest_vars_ex)