summaryrefslogtreecommitdiffstats
path: root/lib.c
diff options
context:
space:
mode:
Diffstat (limited to 'lib.c')
-rw-r--r--lib.c6
1 files changed, 6 insertions, 0 deletions
diff --git a/lib.c b/lib.c
index 80ec19b5..4ce7cbac 100644
--- a/lib.c
+++ b/lib.c
@@ -7685,6 +7685,12 @@ val obj_print_impl(val obj, val out, val pretty)
} else if (sym == expr_s) {
put_char(chr('@'), out);
obj_print_impl(rest(obj), out, pretty);
+ } else if (sym == rcons_s && consp(cdr(obj))
+ && consp(cddr(obj)) && !(cdddr(obj)))
+ {
+ obj_print_impl(second(obj), out, pretty);
+ put_string(lit(".."), out);
+ obj_print_impl(third(obj), out, pretty);
} else {
val iter;
val closepar = chr(')');