summaryrefslogtreecommitdiffstats
path: root/parser.l
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2009-11-18 21:18:45 -0800
committerKaz Kylheku <kaz@kylheku.com>2009-11-18 21:18:45 -0800
commite4edb9aff778c683d81892cca705013dbe5dcc58 (patch)
tree5fcac11e6101a7347e79661e413495485b9f417a /parser.l
parent1c78271501424b45dd4c676806690595ac7e5410 (diff)
downloadtxr-e4edb9aff778c683d81892cca705013dbe5dcc58.tar.gz
txr-e4edb9aff778c683d81892cca705013dbe5dcc58.tar.bz2
txr-e4edb9aff778c683d81892cca705013dbe5dcc58.zip
Fix total breakage of yyerror and yyerrorf.
Diffstat (limited to 'parser.l')
-rw-r--r--parser.l5
1 files changed, 3 insertions, 2 deletions
diff --git a/parser.l b/parser.l
index 332b6fc4..32216967 100644
--- a/parser.l
+++ b/parser.l
@@ -67,7 +67,7 @@ int errors;
void yyerror(const char *s)
{
- yyerrorf(lit("~a"), auto_str(s), nao);
+ yyerrorf(lit("~a"), string_utf8(s), nao);
}
void yyerrorf(obj_t *fmt, ...)
@@ -75,7 +75,8 @@ void yyerrorf(obj_t *fmt, ...)
if (opt_loglevel >= 1) {
va_list vl;
va_start (vl, fmt);
- format(std_error, lit("~a: (~a:~a): "), progname, spec_file, lineno);
+ format(std_error, lit("~a: (~a:~a): "), prog_string,
+ spec_file_str, num(lineno), nao);
vformat(std_error, fmt, vl);
put_char(std_error, chr('\n'));
va_end (vl);