summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--parser.y6
1 files changed, 3 insertions, 3 deletions
diff --git a/parser.y b/parser.y
index 5703bef0..3391c5f3 100644
--- a/parser.y
+++ b/parser.y
@@ -557,7 +557,7 @@ define_clause : DEFINE exprs ')' newl
END newl { $$ = list(define_s, nil, $4, nao);
rl($$, num($1)); }
| DEFINE error { $$ = nil;
- yybadtok(yychar, lit("list expression")); }
+ yybadtok(yychar, lit("define directive")); }
| DEFINE exprs ')' newl
error { $$ = nil; yybadtok(yychar, lit("define")); }
| DEFINE ')' newl
@@ -628,7 +628,7 @@ output_clause : OUTPUT ')' o_elems '\n'
yyerr("invalid combination of old and "
"new syntax in output directive"); }
| OUTPUT error { $$ = nil;
- yybadtok(yychar, lit("list expression")); }
+ yybadtok(yychar, lit("output directive")); }
| OUTPUT ')' o_elems '\n'
error { $$ = nil;
yybadtok(yychar, lit("output clause")); }
@@ -868,7 +868,7 @@ list : '(' n_exprs ')' { $$ = rl($2, num($1)); }
$$ = rl(cons(var_s, cons($2, nil)),
num($1)); }
| '(' error { $$ = nil;
- yybadtok(yychar, lit("list expression")); }
+ yybadtok(yychar, lit("expression")); }
| '[' error { $$ = nil;
yybadtok(yychar, lit("DWIM expression")); }
| '@' error { $$ = nil;