From bd37ad1896a5f33d9447f90d28bda4a568bc882b Mon Sep 17 00:00:00 2001 From: =?utf8?q?David=20V=C3=A1zquez?= Date: Tue, 4 Jun 2013 03:03:03 +0100 Subject: [PATCH] Remove char-to-string from tests --- tests/characters.lisp | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/tests/characters.lisp b/tests/characters.lisp index a745051..03016d3 100644 --- a/tests/characters.lisp +++ b/tests/characters.lisp @@ -132,8 +132,7 @@ ;; CHAR-INT (test (= (char-int #\A) (char-int #\A))) ;; can be pretty much anything, as long as it's consistent -;; CHAR-TO-STRING (not actually part of the characters dictionary) -(test (= 1 (string-length (char-to-string (code-char 127744))))) +(test (= 1 (string-length (string (code-char 127744))))) ;; CHAR-CODE-LIMIT (test (< 95 char-code-limit 10000000)) -- 1.7.10.4