summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2017-05-05 23:24:19 -0700
committerKaz Kylheku <kaz@kylheku.com>2017-05-05 23:24:19 -0700
commit201afd5bbbe09b894f8c7f52e4043a19866359c6 (patch)
treeb7c347ed40ad7da9a2f95dca8ee1161bb9db8bc0
parent04d937d72aae44ccf0157a0a092f5ad67a4011b7 (diff)
downloadtxr-201afd5bbbe09b894f8c7f52e4043a19866359c6.tar.gz
txr-201afd5bbbe09b894f8c7f52e4043a19866359c6.tar.bz2
txr-201afd5bbbe09b894f8c7f52e4043a19866359c6.zip
Fix broken quasilist print notation.
* lib.c (obj_print_impl): Remove spurious output statement from quasi word list literal printing code. The spurious output completely ruins the printed representation.
-rw-r--r--lib.c1
1 files changed, 0 insertions, 1 deletions
diff --git a/lib.c b/lib.c
index 87a7dfad..4de39f4e 100644
--- a/lib.c
+++ b/lib.c
@@ -10089,7 +10089,6 @@ val obj_print_impl(val obj, val out, val pretty, struct strm_ctx *ctx)
out_quasi_str(car(args), out, ctx);
args = cdr(args);
}
- out_quasi_str(cdr(obj), out, ctx);
put_char(chr('`'), out);
} else {
val iter;