Skip to content

Commit

Permalink
Add verify unicode.lsp
Browse files Browse the repository at this point in the history
  • Loading branch information
sasagawa888 committed Nov 3, 2023
1 parent 4d11c54 commit a8f2200
Show file tree
Hide file tree
Showing 2 changed files with 5 additions and 0 deletions.
1 change: 1 addition & 0 deletions verify/all.sh
Original file line number Diff line number Diff line change
Expand Up @@ -21,5 +21,6 @@ eisl -s verify/seq.lsp
eisl -s verify/stream.lsp
eisl -s verify/string.lsp
eisl -s verify/symbol.lsp
eisl -s verify/unicode.lsp
eisl -s verify/unwind.lsp
eisl -s verify/vector.lsp
4 changes: 4 additions & 0 deletions tests/unicode-test.lsp → verify/unicode.lsp
Original file line number Diff line number Diff line change
Expand Up @@ -4,6 +4,10 @@ Unicode extention tests

(import "test")

($ap 2 "Unicode test")

($test (create-string 1 #\φ) "φ")
($test (create-string 1 #\金) "")
($test (char= #\笹 #\笹) t)
($test (char= #\笹 #\川) nil)
($test (string= "こんにちは世界" "こんにちは世界") t)
Expand Down

0 comments on commit a8f2200

Please sign in to comment.