Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-07-12 23:47:34 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

handle shared dotted tail in writing lists (issue #618)

Browse source
This commit is contained in:
Alex Shinn 2020-06-15 12:22:16 +09:00
parent 4734fc1e40
commit 08c72aca59
1 changed files with 2 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lib/srfi/38.scm
View file

@ -94,6 +94,8 @@
(display " " out) (display " " out)
(wr (car ls)) (wr (car ls))
(lp (cdr ls))))) (lp (cdr ls)))))
(shared? ;; shared dotted tail
(write ls out))
(else (else
(display " . " out) (display " . " out)
(wr ls)))))) (wr ls))))))