diff options
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/read-print.scm | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/tests/read-print.scm b/tests/read-print.scm index 004fcff19f..b484e28022 100644 --- a/tests/read-print.scm +++ b/tests/read-print.scm @@ -142,6 +142,21 @@ expressions." (* z z)))") (test-pretty-print "\ +(case x + ((1) + 'one) + ((2) + 'two))") + +(test-pretty-print "\ +(cond + ((zero? x) + 'zero) + ((odd? x) + 'odd) + (else #f))") + +(test-pretty-print "\ #~(string-append #$coreutils \"/bin/uname\")") (test-pretty-print "\ |