tests/equal.lisp

   1 (test (equal '(1 2) '(1 2)))
   2 (test (equal 1 1))
   3 (test (equal "abc" "abc"))
   4 (test (not (equal "abc" "def")))
   5 (test (not (equal "Abc" "abc")))
   6 (test (equal #(1 2 3) #(1 2 3)))