
16 Dec
2007
16 Dec
'07
2:42 p.m.
Update of /project/mcclim/cvsroot/mcclim/Drei In directory clnet:/tmp/cvs-serv24695 Modified Files: lisp-syntax-swine.lisp Log Message: Added `parameter-match-p' case where no arg indices are available. --- /project/mcclim/cvsroot/mcclim/Drei/lisp-syntax-swine.lisp 2007/12/08 08:53:50 1.9 +++ /project/mcclim/cvsroot/mcclim/Drei/lisp-syntax-swine.lisp 2007/12/16 14:42:07 1.10 @@ -67,6 +67,8 @@ (defgeneric parameter-match-p (parameter arg-indices &key &allow-other-keys) (:method ((parameter parameter) (arg-indices list) &key) + nil) + (:method :around ((parameter parameter) (arg-indices null) &key) nil)) (defmethod parameter-match-p ((parameter named-parameter) (arg-indices list) &key)