diff --git a/ansi-tests/character.lsp b/ansi-tests/character.lsp index acf2b6b600ba0dc0190f40948c03f029081cbd46..d407b6269368c20bc21f46ab2c0bb989189f954c 100644 --- a/ansi-tests/character.lsp +++ b/ansi-tests/character.lsp @@ -347,10 +347,21 @@ ;;; +;; based on http://unicode.org/faq/casemap_charprop.html#2 +;; ABCL doesn't implement the pairwise case mappings +;; ABCL deems Unicode conformance more important than CLHS conformance +;; SBCL's solution to make these tests work is by declaring +;; characters to be without case, even though Unicode does declare +;; a case mapping +;; +;; this comment applies to char-upcase.1 and char-upcase.2 + +#-abcl (deftest char-upcase.1 (char-upcase.1.body) t) +#-abcl (deftest char-upcase.2 (char-upcase.2.body) t)