projects
/
jscl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
77ec86f
)
Remove unnecesary test
author
David Vázquez
<davazp@gmail.com>
Fri, 7 Jun 2013 15:06:46 +0000
(16:06 +0100)
committer
David Vázquez
<davazp@gmail.com>
Fri, 7 Jun 2013 15:06:46 +0000
(16:06 +0100)
tests/characters.lisp
patch
|
blob
|
history
diff --git
a/tests/characters.lisp
b/tests/characters.lisp
index
03016d3
..
74679f6
100644
(file)
--- 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))