summaryrefslogtreecommitdiffstats
path: root/parser.y
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2011-09-26 21:39:44 -0700
committerKaz Kylheku <kaz@kylheku.com>2011-09-26 21:45:45 -0700
commit7185545a38de4f53bf3c92be5d1d97d2928ffbb9 (patch)
treefcc1a4a6f69cf716e9212802a777068444756411 /parser.y
parent070d3dfe7759943406cd76e7aebe72bf92ab3503 (diff)
downloadtxr-7185545a38de4f53bf3c92be5d1d97d2928ffbb9.tar.gz
txr-7185545a38de4f53bf3c92be5d1d97d2928ffbb9.tar.bz2
txr-7185545a38de4f53bf3c92be5d1d97d2928ffbb9.zip
Bugfixes: Consistent escaping in various literals. Double
backslash codes for single backslash. Output clause can be empty. * parser.l (char_esc): Backslash handled. Use internal_error rather than abort. (REGCHAR, LITCHAR): Backslash added to lexical syntax. * parser.y (output_clause): Allow empty output clause.
Diffstat (limited to 'parser.y')
-rw-r--r--parser.y2
1 files changed, 2 insertions, 0 deletions
diff --git a/parser.y b/parser.y
index e6e66d1d..2ad2d53f 100644
--- a/parser.y
+++ b/parser.y
@@ -271,6 +271,8 @@ output_clause : OUTPUT ')' o_elems '\n'
END newl { $$ = nil;
yyerror("obsolete output syntax: trailing material"); }
| OUTPUT ')' newl
+ END newl { $$ = list(output_s, nao); }
+ | OUTPUT ')' newl
out_clauses
END newl { $$ = list(output_s, $4, nao); }
| OUTPUT exprs ')' newl