2 files changed, 6 insertions, 1 deletions
diff --git a/ChangeLog b/ChangeLog
index 5f784c08..64d6b155 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2011-11-19  Kaz Kylheku  <kaz@kylheku.com>
+
+	* parser.y (yybadtoken): Use ~a to print bad character rather than #\
+	notation.
+
 2011-11-18  Kaz Kylheku  <kaz@kylheku.com>
 
 	* parser.y: Regression IDENT, '{' and '}'
diff --git a/parser.y b/parser.y
index bab1460f..416ab46e 100644
--- a/parser.y
+++ b/parser.y
@@ -952,7 +952,7 @@ void yybadtoken(int tok, val context)
       if (tok == YYEOF || tok == YYEMPTY)
         yyerrorf(lit("unterminated ~a"), context, nao);
       else
-        yyerrorf(lit("misplaced ~s in ~a"), chr(tok), context, nao);
+        yyerrorf(lit("misplaced character ~a in ~a"), chr(tok), context, nao);
     else
       if (tok == YYEOF)
         yyerrorf(lit("unexpected end of input"), nao);