summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--parser.c4
1 files changed, 4 insertions, 0 deletions
diff --git a/parser.c b/parser.c
index 60fd0655..1a375bd7 100644
--- a/parser.c
+++ b/parser.c
@@ -1647,8 +1647,12 @@ val repl(val bindings, val in_stream, val out_stream, val env)
uw_catch_begin (catch_all, exsym, exvals);
+ uw_push_handler(&uw_handler, cons(warning_s, nil), rw_f);
+
line_w = linenoise(ls, c_str(prompt, self));
+ uw_pop_frame(&uw_handler);
+
#if CONFIG_FULL_REPL
rplacd(multi_line_var, tnil(lino_get_multiline(ls)));
#endif