diff --git a/pcl/combin.lisp b/pcl/combin.lisp index 512916f856b639b8c9a9caa6241e8499d1e61122..a904e97b56bb33af52f361a8a8fc72191967be02 100644 --- a/pcl/combin.lisp +++ b/pcl/combin.lisp @@ -25,7 +25,7 @@ ;;; ************************************************************************* (file-comment - "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/combin.lisp,v 1.22 2004/03/29 23:39:38 rtoy Exp $") + "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/combin.lisp,v 1.23 2004/04/02 15:24:02 rtoy Exp $") (in-package "PCL") @@ -518,7 +518,7 @@ ((eq (get-method-call-type gf form method-alist-p wrappers-p) 'fast-method-call) '.fast-call-method.) - (t .call-method.)))) + (t '.call-method.)))) (case (car-safe form) ;; (call-method