From: David Vázquez <davazp@gmail.com>
Date: Wed, 1 May 2013 21:31:16 +0000 (+0100)
Subject: Vectors are equal if they are eql only
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=b917c645b8fd1402633b3540721e9c84ec6f4671;p=jscl.git

Vectors are equal if they are eql only
---

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))))))