mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-18 01:30:27 +02:00
Code Activity

Merge branch 'stable-2.0'

Browse source
This commit is contained in:
Mark H Weaver 2014-01-14 23:53:08 -05:00
commit fb484fefeb
2 changed files with 11 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

5
test-suite/tests/print.test
View file

@ -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)