record some failing tests
Fri Jul 17 10:35:48 PDT 2009 attila.lendvai@gmail.com
* record some failing tests
Warning: CRC errors found. These are probably harmless but should be repaired.
See 'darcs gzcrcs --help' for more information.
diff -rN -u old-cl-walker/tests/walk-unwalk.lisp new-cl-walker/tests/walk-unwalk.lisp
--- old-cl-walker/tests/walk-unwalk.lisp 2014-07-25 22:10:12.000000000 -0700
+++ new-cl-walker/tests/walk-unwalk.lisp 2014-07-25 22:10:12.000000000 -0700
@@ -44,7 +44,8 @@
(is (typep (walk-form 'nil) 'constant-form)))
(define-walk-unwalk-test test/variable
- var)
+ var
+ :var)
(define-walk-unwalk-test test/application
(* 2 3)
@@ -96,6 +97,7 @@
#'(lambda (x &key y z) (z (y x)))
#'(lambda (&optional x y) (list x y))
#'(lambda (x &rest args) (apply x args))
+ #'(lambda (object &key (a nil a?)) (values))
#'(lambda (object &key a b &allow-other-keys) (values))
#'(lambda (&optional x y &rest args &key a b &allow-other-keys) 42))