summaryrefslogtreecommitdiffstats
path: root/eval.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2011-11-29 22:55:03 -0800
committerKaz Kylheku <kaz@kylheku.com>2011-11-29 22:55:03 -0800
commit03099f03ad9b4d7797cb9942ae46a3463c2070ad (patch)
tree6c90db2727516cd6eead5129d476090bcf03d517 /eval.c
parenta04b60037b08e418d7c6e21eb62b90a339338ae0 (diff)
downloadtxr-03099f03ad9b4d7797cb9942ae46a3463c2070ad.tar.gz
txr-03099f03ad9b4d7797cb9942ae46a3463c2070ad.tar.bz2
txr-03099f03ad9b4d7797cb9942ae46a3463c2070ad.zip
* eval.c (bindings_helper): Fix uninitialized variable.
Diffstat (limited to 'eval.c')
-rw-r--r--eval.c2
1 files changed, 2 insertions, 0 deletions
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)) {