From ab2386d19d534a8f9d6d0762e36ee5c3dc72b9b4 Mon Sep 17 00:00:00 2001 From: =?utf8?q?David=20V=C3=A1zquez?= Date: Fri, 7 Jun 2013 16:06:46 +0100 Subject: [PATCH] Remove unnecesary test --- tests/characters.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/tests/characters.lisp b/tests/characters.lisp index 03016d3..74679f6 100644 --- a/tests/characters.lisp +++ b/tests/characters.lisp @@ -132,7 +132,7 @@ ;; CHAR-INT (test (= (char-int #\A) (char-int #\A))) ;; can be pretty much anything, as long as it's consistent -(test (= 1 (string-length (string (code-char 127744))))) +(test (= 1 (length (string (code-char 127744))))) ;; CHAR-CODE-LIMIT (test (< 95 char-code-limit 10000000)) -- 1.7.10.4