summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2017-01-18 02:13:51 -0800
committerKaz Kylheku <kaz@kylheku.com>2017-01-18 02:13:51 -0800
commit24a4f4e1df8c2d00309fde996fdc19434ef5673e (patch)
treea1facf905e7d37d0f87832e70582e280fc68ded5
parent2a98f10a99b358223525c519ec64cfdee8a94fad (diff)
downloadtxr-24a4f4e1df8c2d00309fde996fdc19434ef5673e.tar.gz
txr-24a4f4e1df8c2d00309fde996fdc19434ef5673e.tar.bz2
txr-24a4f4e1df8c2d00309fde996fdc19434ef5673e.zip
Bugfix: macros not expanded in quasiliterals.
* eval.c (expand_quasi): Add all-important missing case which expands compound forms. This looks like a txr-160 regression.
-rw-r--r--eval.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/eval.c b/eval.c
index cf66cc25..75f82584 100644
--- a/eval.c
+++ b/eval.c
@@ -3156,6 +3156,8 @@ static val expand_quasi(val quasi_forms, val menv)
if (param_ex != param || mods_ex != mods)
form_ex = rlcp(list(sym, param_ex, mods_ex, nao), form);
+ } else {
+ form_ex = expand(form, menv);
}
}