X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=tests%2Fequal.lisp;h=856a155f16b6874154be11ade01ab776f0bf64c3;hb=8de6bd35930e6f3c3e37b9800955faf81882971d;hp=7f76510c639b82865c29d9d7c23ec5d17938fb8d;hpb=cbfef25a94fd3082f517d93bc40d9e9e61e1da11;p=jscl.git

diff --git a/tests/equal.lisp b/tests/equal.lisp
index 7f76510..856a155 100644
--- a/tests/equal.lisp
+++ b/tests/equal.lisp
@@ -3,8 +3,3 @@
 (test (equal "abc" "abc"))
 (test (not (equal "abc" "def")))
 (test (not (equal "Abc" "abc")))
-(test (equal #(1 2 3) #(1 2 3)))
-(test (equal '(1 2 #(3 4 ("a b c" T)))
-             '(1 2 #(3 4 ("a b c" T)))))
-(test (not (equal '(1 2 #(3 4 ("a b c" T)))
-                  '(1 2 #(3 4 ("a b x" T))))))