Bugfix: unterminated format argument list in repl code.

* parser.c (repl): Missing nao terminator in format
call which computes expression name.

1 files changed, 1 insertions, 1 deletions

diff --git a/parser.c b/parser.c
index 9cdb0a85..9acfa0da 100644
--- a/parser.c
+++ b/parser.c
@@ -701,7 +701,7 @@ 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 name = format(nil, lit("expr-~a"), prev_counter, nao);
       val line = string_utf8(line_u8);
       val form = lisp_parse(line, out_stream, colon_k, name, colon_k);
       if (form == quit_k) {