* eval.c (bindings_helper): Fix uninitialized variable.

2 files changed, 6 insertions, 0 deletions

diff --git a/ChangeLog b/ChangeLog
index 58caf047..aad5e868 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,9 @@
 2011-11-29  Kaz Kylheku  <kaz@kylheku.com>
 
+	* eval.c (bindings_helper): Fix uninitialized variable.
+
+2011-11-29  Kaz Kylheku  <kaz@kylheku.com>
+
 	* eval.c (dohash_s): New symbol variable.
 	(op_dohash): New static function
 	(expand): New case for dohash_s.
diff --git a/eval.c b/eval.c
index d6be711f..5e1c7d13 100644
--- a/eval.c
+++ b/eval.c
@@ -368,6 +368,8 @@ static val bindings_helper(val vars, val env, val sequential, val ctx_form)
                    car(ctx_form), item, nao);
       var = first(item);
       val = eval(second(item), nenv, ctx_form);
+    } else {
+      var = item;
     }
 
     if (symbolp(var)) {