small bug in format: handle missing format char.

* stream.c (formatv): When the format string ends
at the point where the format character is expected
to occur, do not emit an error about #\nul being
an unknown format directive character; emit
an error that the character is missing.

1 files changed, 2 insertions, 0 deletions

diff --git a/stream.c b/stream.c
index b5819521..d85cd13b 100644
--- a/stream.c
+++ b/stream.c
@@ -3233,6 +3233,8 @@ val formatv(val stream_in, val fmtstr, struct args *al)
           else
             inc_indent(stream, num(width));
           continue;
+        case 0:
+          uw_throwf(error_s, lit("missing format directive character"), nao);
         default:
           uw_throwf(error_s, lit("unknown format directive character ~s\n"),
                     chr(ch), nao);