diff --git a/ansi-tests/character.lsp b/ansi-tests/character.lsp index d407b6269368c20bc21f46ab2c0bb989189f954c..2f691e9feee6225de9158212cf5cf282cece3975 100644 --- a/ansi-tests/character.lsp +++ b/ansi-tests/character.lsp @@ -355,6 +355,7 @@ ;; a case mapping ;; ;; this comment applies to char-upcase.1 and char-upcase.2 +;; and char-downcase.1 and char-downcase.2 #-abcl (deftest char-upcase.1 @@ -391,10 +392,13 @@ ;;; +;; see char-upcase.1 why this test is commented out for ABCL +#-abcl (deftest char-downcase.1 (char-downcase.1.body) t) +#-abcl (deftest char-downcase.2 (char-downcase.2.body) t)