Fri Feb 5 09:30:48 UTC 2010 pix@kepibu.org * Whoops. Typo in test. diff -rN -u old-cl-unification-1/test/unification-tests.lisp new-cl-unification-1/test/unification-tests.lisp --- old-cl-unification-1/test/unification-tests.lisp 2013-07-26 18:28:55.000000000 +0000 +++ new-cl-unification-1/test/unification-tests.lisp 2013-07-26 18:28:55.000000000 +0000 @@ -230,7 +230,7 @@ (test '(42 43 44) (nested-matchf-cases '(:a 42 :b ((:d 42) (:c 43) (:c 44)))) :test #'equal) - (test-error (match ('(x) '(xx) :errorp nil) + (test-error (match ('(x) '(x) :errorp nil) (error 'inner-unification-failure)) :condition-type 'inner-unification-failure)