summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--parser.c5
1 files changed, 3 insertions, 2 deletions
diff --git a/parser.c b/parser.c
index 37255ae0..f06ccae2 100644
--- a/parser.c
+++ b/parser.c
@@ -566,8 +566,9 @@ val repl(val bindings, val in_stream, val out_stream)
}
uw_catch (exsym, exvals) {
- reg_varl(var_sym, nil);
- sethash(result_hash, var_counter, nil);
+ val exinfo = cons(exsym, exvals);
+ reg_varl(var_sym, exinfo);
+ sethash(result_hash, var_counter, exinfo);
lino_hist_add(ls, line_u8);
if (uw_exception_subtype_p(exsym, syntax_error_s)) {