diff --git a/pcl/methods.lisp b/pcl/methods.lisp index a2c42ea6d02b733bfacf03143bba8a654bbf304d..0a6a3a2d05881cc4c40d9c3d3e8c90376999d176 100644 --- a/pcl/methods.lisp +++ b/pcl/methods.lisp @@ -26,7 +26,7 @@ ;;; (file-comment - "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/methods.lisp,v 1.39 2003/06/06 12:22:32 gerd Exp $") + "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/methods.lisp,v 1.40 2003/07/21 17:36:47 gerd Exp $") (in-package :pcl) @@ -90,7 +90,7 @@ (unparse-specializers method))) (call-next-method)))) -(defmethod print-object ((gf generic-function) stream) +(defmethod print-object ((gf standard-generic-function) stream) (named-object-print-function gf stream