diff options
Diffstat (limited to 'lib.c')
-rw-r--r-- | lib.c | 6 |
1 files changed, 6 insertions, 0 deletions
@@ -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(')'); |