From 4fa8bbcb93d76caa7e599c60952ee06c45f55bd2 Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Fri, 10 Jul 2015 07:11:25 -0700 Subject: * stream.c (byte_in_unget_byte): Wrong function name in error message. --- ChangeLog | 4 ++++ stream.c | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/ChangeLog b/ChangeLog index d26d23ce..bab4ca13 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,7 @@ +2015-07-10 Kaz Kylheku + + * stream.c (byte_in_unget_byte): Wrong function name in error message. + 2015-07-10 Kaz Kylheku Fix unget-byte and unget-char on catenated streams. diff --git a/stream.c b/stream.c index 0f806401..30c77ee3 100644 --- a/stream.c +++ b/stream.c @@ -1074,7 +1074,7 @@ static val byte_in_unget_byte(val stream, int byte) if (bi->index == 0) uw_throwf(file_error_s, - lit("unget-char: cannot push past beginning of byte stream"), + lit("unget-byte: cannot push past beginning of byte stream"), nao); bi->buf[--bi->index] = byte; -- cgit v1.2.3