summaryrefslogtreecommitdiffstats
path: root/lib.c
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
commite25f2c548e36eb162a64b04a4de62a803f1fe132 (patch)
treeb7c347ed40ad7da9a2f95dca8ee1161bb9db8bc0 /lib.c
parentf7b1729c070b1264fbe0c05d9e734d0c565bf64e (diff)
downloadtxr-e25f2c548e36eb162a64b04a4de62a803f1fe132.tar.gz
txr-e25f2c548e36eb162a64b04a4de62a803f1fe132.tar.bz2
txr-e25f2c548e36eb162a64b04a4de62a803f1fe132.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.
Diffstat (limited to 'lib.c')
-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;