From 03099f03ad9b4d7797cb9942ae46a3463c2070ad Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Tue, 29 Nov 2011 22:55:03 -0800 Subject: * eval.c (bindings_helper): Fix uninitialized variable. --- eval.c | 2 ++ 1 file changed, 2 insertions(+) (limited to 'eval.c') 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)) { -- cgit v1.2.3