Change how error locations are reported in REPL.

Now that we have a multi-line mode, it no longer works that we
use the command line number as the parse line number, so that
an error from something that was parsed in command 42 comes
out as "line:42". This commit changes to the format
"expr-42:3": line 3 of expression 42. The expression number is
fixed in the parse name, and the line number is derived from
the line divisions in the entry itself.

* parser.c (repl): Dynamically compute the parse name,
such that it contains the command number. Then when parsing,
just leave the parse to begin at line 1.

1 files changed, 2 insertions, 2 deletions

diff --git a/parser.c b/parser.c
index ec263122..ddc0d22d 100644
--- a/parser.c
+++ b/parser.c
@@ -646,9 +646,9 @@ val repl(val bindings, val in_stream, val out_stream)
     uw_catch_begin (catch_all, exsym, exvals);
 
     {
+      val name = format(nil, lit("expr-~a"), prev_counter);
       val line = string_utf8(line_u8);
-      val form = lisp_parse(line, out_stream, colon_k,
-                            lit("line"), prev_counter);
+      val form = lisp_parse(line, out_stream, colon_k, name, colon_k);
       if (form == quit_k) {
         done = t;
       } else {