For vectors, spaces come before 2nd-Nth values; #(1 2 3) vs. #(12 3 ).

This commit is contained in:
Jesse D. McDonald 2011-12-08 17:12:14 -06:00
parent f3458173c4
commit d79eab3848
1 changed files with 2 additions and 2 deletions

View File

@ -233,8 +233,8 @@
(unless (zero? (vector-length value)) (unless (zero? (vector-length value))
(write-rla-val (vector-ref value 0))) (write-rla-val (vector-ref value 0)))
(for ([i (in-range 1 (vector-length value))]) (for ([i (in-range 1 (vector-length value))])
(write-rla-val (vector-ref value i)) (write-char #\Space)
(write-char #\Space)) (write-rla-val (vector-ref value i)))
(write-string ")")] (write-string ")")]
[(null? value) [(null? value)
(write-string "()")] (write-string "()")]