summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2011-11-19 11:15:20 -0800
committerKaz Kylheku <kaz@kylheku.com>2011-11-19 11:15:20 -0800
commitd3ba0368d9c5012ca9405ac55a6d9a632fb0895a (patch)
tree7b6169a67d9888da1383bd10c3c626f9118ee541
parent8a8812cda3e06312e650dcff7c1e3bb82479d20f (diff)
downloadtxr-d3ba0368d9c5012ca9405ac55a6d9a632fb0895a.tar.gz
txr-d3ba0368d9c5012ca9405ac55a6d9a632fb0895a.tar.bz2
txr-d3ba0368d9c5012ca9405ac55a6d9a632fb0895a.zip
* parser.y (yybadtoken): Use ~a to print bad character rather than #\
notation.
-rw-r--r--ChangeLog5
-rw-r--r--parser.y2
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);