From 6d56f397e2c4a0cdbc9aff0a38fa29c3196986c4 Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Fri, 7 Oct 2016 20:56:40 -0700
Subject: 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.
---
 stream.c | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'stream.c')

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);
-- 
cgit v1.2.3