summaryrefslogtreecommitdiffstats
path: root/parser.y
diff options
context:
space:
mode:
Diffstat (limited to 'parser.y')
-rw-r--r--parser.y7
1 files changed, 3 insertions, 4 deletions
diff --git a/parser.y b/parser.y
index 01a1c91a..5a2ef76f 100644
--- a/parser.y
+++ b/parser.y
@@ -782,10 +782,9 @@ o_var : SYMTOK { val expr = symhlpr($1, nil);
expand_meta($2, nil),
expand_meta($3, nil), nao); }
else
- { $$ = list(var_s,
- expand($2, nil),
- expand_forms($3, nil), nao); }
- rl($$, num(parser->lineno)); }
+ { val quasi_var = list(var_s, $2, $3, nao);
+ val quasi_items = cons(quasi_var, nil);
+ $$ = car(expand_quasi(quasi_items, nil)); } }
| SYMTOK error { $$ = nil;
yybadtok(yychar, lit("variable spec")); }
;