diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2011-12-16 09:07:22 -0800 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2011-12-16 09:07:22 -0800 |
commit | 1bab133df8cf48d33296b299a25f0616b10bb7b1 (patch) | |
tree | ed11cbcd8de916da3b33598a17d7f3e6e3ec5fa2 /eval.c | |
parent | a71779857107fb3cdf53ce32900087e74854a4a7 (diff) | |
download | txr-1bab133df8cf48d33296b299a25f0616b10bb7b1.tar.gz txr-1bab133df8cf48d33296b299a25f0616b10bb7b1.tar.bz2 txr-1bab133df8cf48d33296b299a25f0616b10bb7b1.zip |
* eval.c (expand_vars): Bugfix: use expand_forms rather than
expand on a list of forms.
Diffstat (limited to 'eval.c')
-rw-r--r-- | eval.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -848,7 +848,7 @@ static val expand_vars(val vars) } else { cons_bind (var, init, car(vars)); val rest_vars = rest(vars); - val init_ex = expand(init); + val init_ex = expand_forms(init); val rest_vars_ex = expand_vars(rest_vars); if (init == init_ex && rest_vars == rest_vars_ex) |