summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ChangeLog4
-rw-r--r--eval.c2
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)) {