fix SRFI-14 tests for Unicode 7.0
This commit is contained in:
parent
97bd3f7549
commit
fa00d01b6f
|
@ -58,8 +58,9 @@
|
|||
(test #t char-set-contains? char-set:letter+digit #\A)
|
||||
(test #t char-set-contains? char-set:letter+digit #\Z)
|
||||
|
||||
;; As of Unicode 5.0:
|
||||
(test 93217 char-set-size char-set:letter)
|
||||
;; As of Unicode 5.0: 93217
|
||||
;; As of Unicode 7.0:
|
||||
(test 104077 char-set-size char-set:letter)
|
||||
|
||||
(test #t char-set= char-set:letter+digit (char-set-union char-set:letter char-set:digit))
|
||||
;; Slow!:
|
||||
|
@ -117,8 +118,9 @@
|
|||
|
||||
;; Iterating over character sets ----------------------------------------
|
||||
|
||||
;; As of Unicode 5.0
|
||||
(test 388 char-set-size char-set:digit)
|
||||
;; As of Unicode 5.0: 388
|
||||
;; As of Unicode 7.0:
|
||||
(test 668 char-set-size char-set:digit)
|
||||
|
||||
(test #t char-set=
|
||||
char-set:digit
|
||||
|
|
Loading…
Reference in New Issue
Block a user