conservatory
/
picrin
4
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

unlock a string test

This commit is contained in:
Yuichi Nishiwaki 2014-06-28 20:21:02 +09:00
parent d294330aa5
commit 0716ff8a03
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
t/r7rs-tests.scm
View File

@ -1151,7 +1151,7 @@
;; (string-set! s 1 #\x1F700) ;; (string-set! s 1 #\x1F700)
;; s)) ;; s))
#;(test #t (string=? "" "")) (test #t (string=? "" ""))
(test #t (string=? "abc" "abc" "abc")) (test #t (string=? "abc" "abc" "abc"))
(test #f (string=? "" "abc")) (test #f (string=? "" "abc"))
(test #f (string=? "abc" "aBc")) (test #f (string=? "abc" "aBc"))