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-21 19:26:31.000000000 +0000
+++ new-cl-unification-1/test/unification-tests.lisp 2013-07-21 19:26:31.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)