summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2024-05-27 20:22:37 -0700
committerKaz Kylheku <kaz@kylheku.com>2024-05-27 20:22:37 -0700
commitce6aeebed4f96c213c8838b3fdeb3427795f8998 (patch)
tree94a27077b22027c0306888ce59b7e242dfd57408
parent6bccfe8a55a12ef162fd945633c130f8b3362529 (diff)
downloadtxr-ce6aeebed4f96c213c8838b3fdeb3427795f8998.tar.gz
txr-ce6aeebed4f96c213c8838b3fdeb3427795f8998.tar.bz2
txr-ce6aeebed4f96c213c8838b3fdeb3427795f8998.zip
bugfix: one missing case of fmt_cat separator defaulting.
In a recent commit, the defaulting of the separator in quasiliteral variable formatting was moved down into the fmt_cat routine. One stray case remains in subst_vars. * eval.c (subst_vars): A call to fmt_cat is specifying a separator value consisting of a single space. This is wrong, preventing fmt_cat from defaulting it in different ways according to type.
-rw-r--r--eval.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/eval.c b/eval.c
index f63e01a1..1e6e48d5 100644
--- a/eval.c
+++ b/eval.c
@@ -3161,7 +3161,7 @@ val subst_vars(val forms, val env, val filter)
pa_123_1(func_n3(eval), env, form)),
rest(forms));
} else {
- str = fmt_cat(str, lit(" "));
+ str = fmt_cat(str, nil);
forms = cons(filter_string_tree(filter, str), rest(forms));
}