X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=tests%2Fcharacter.pure.lisp;h=742723456c5254e220ffc4871651edfcc22e4a7a;hb=f44f6d1adbaaa7057f1948369299c0b2a08bcd6e;hp=d2dd66c3172e7dcc897807f7b5dd7bf26ccebcc4;hpb=0d51ca7e5e624dc3bad5c87e14211e8e6f7b3a45;p=sbcl.git diff --git a/tests/character.pure.lisp b/tests/character.pure.lisp index d2dd66c..7427234 100644 --- a/tests/character.pure.lisp +++ b/tests/character.pure.lisp @@ -130,8 +130,7 @@ (with-test (:name (:case-insensitive-char-comparisons :eacute)) (assert (char-equal (code-char 201) (code-char 233)))) -(with-test (:name (:case-insensitive-char-comparisons :exhaustive) - :fails-on :sb-unicode) +(with-test (:name (:case-insensitive-char-comparisons :exhaustive)) (dotimes (i char-code-limit) (let* ((char (code-char i)) (down (char-downcase char))