X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=inline;f=contrib%2Fsb-cltl2%2Ftests.lisp;h=a314d8da6b5b57ae9eaabeeb28ad5ee73566a07d;hb=9af8ab0a80bbd4d579ed4a12d2a2819a7490901a;hp=ec5e8c96df99cc2e9c946c1ae27f68d5863869c0;hpb=79a8e51bf4b06a5bd57bc90233605f98fee3b041;p=sbcl.git

diff --git a/contrib/sb-cltl2/tests.lisp b/contrib/sb-cltl2/tests.lisp
index ec5e8c9..a314d8d 100644
--- a/contrib/sb-cltl2/tests.lisp
+++ b/contrib/sb-cltl2/tests.lisp
@@ -182,7 +182,7 @@
           (assert (plusp x)))))
   (:lexical t nil))
 
-(deftest variable-info.lexical.type.2
+(deftest variable-info.lexical.type.3
     (let ((x 42))
       (locally (declare (fixnum x))
         (var-info x)))