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
commit32462b4bbfb47a8208390bcad3ad784694a69674 (patch)
treea1facf905e7d37d0f87832e70582e280fc68ded5
parent2e7acf647cac30fdd64dc96c414b889a8b60ba39 (diff)
downloadtxr-32462b4bbfb47a8208390bcad3ad784694a69674.tar.gz
txr-32462b4bbfb47a8208390bcad3ad784694a69674.tar.bz2
txr-32462b4bbfb47a8208390bcad3ad784694a69674.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);
}
}