summaryrefslogtreecommitdiffstats
path: root/parser.y
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2017-01-22 06:37:49 -0800
committerKaz Kylheku <kaz@kylheku.com>2017-01-22 06:37:49 -0800
commitc9838a34a60b15bab4c702f66ebfc17b15a03ba2 (patch)
tree239ac3d86ceea307dc0215ab6b6c5b22b061743e /parser.y
parenta928f32d7f83e7cb0cbf7a7251d3edd5ca5487ce (diff)
downloadtxr-c9838a34a60b15bab4c702f66ebfc17b15a03ba2.tar.gz
txr-c9838a34a60b15bab4c702f66ebfc17b15a03ba2.tar.bz2
txr-c9838a34a60b15bab4c702f66ebfc17b15a03ba2.zip
parser bugfix: expand used instead of expand_forms.
* parser.y (o_var): fix expand wrongly being called on a list of forms.
Diffstat (limited to 'parser.y')
-rw-r--r--parser.y2
1 files changed, 1 insertions, 1 deletions
diff --git a/parser.y b/parser.y
index 73b9ce1f..7d1cd0ca 100644
--- a/parser.y
+++ b/parser.y
@@ -784,7 +784,7 @@ o_var : SYMTOK { val expr = symhlpr($1, nil);
else
{ $$ = list(var_s,
expand($2, nil),
- expand($3, nil), nao); }
+ expand_forms($3, nil), nao); }
rl($$, num(parser->lineno)); }
| SYMTOK error { $$ = nil;
yybadtok(yychar, lit("variable spec")); }