summaryrefslogtreecommitdiffstats
path: root/parser.c
diff options
context:
space:
mode:
Diffstat (limited to 'parser.c')
-rw-r--r--parser.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/parser.c b/parser.c
index f64c4681..f346c69c 100644
--- a/parser.c
+++ b/parser.c
@@ -542,6 +542,7 @@ val repl(val bindings, val in_stream, val out_stream)
if (uw_exception_subtype_p(exsym, syntax_error_s)) {
/* suppress syntax error exceptions: uninformative in the repl */
} else if (uw_exception_subtype_p(exsym, error_s)) {
+ put_string(lit("** "), out_stream);
obj_pprint(car(exvals), out_stream);
if (cdr(exvals)) {
put_string(lit(" "), out_stream);