summaryrefslogtreecommitdiff
path: root/test-suite/tests
diff options
context:
space:
mode:
Diffstat (limited to 'test-suite/tests')
-rw-r--r--test-suite/tests/print.test5
1 files changed, 5 insertions, 0 deletions
diff --git a/test-suite/tests/print.test b/test-suite/tests/print.test
index 7269887d6..6ef0e9fc7 100644
--- a/test-suite/tests/print.test
+++ b/test-suite/tests/print.test
@@ -63,6 +63,11 @@
"bar | backslash \\ alarm \a backspace \b tab \t newline \n cr \r null \0 del "
(string #\del)))))
+ (pass-if-equal "brackets"
+ "|()[]{}|"
+ (write-with-options '(r7rs-symbols)
+ (string->symbol "()[]{}")))
+
(pass-if-equal "starts with bar"
"|\\|foo|"
(write-with-options '(r7rs-symbols)