logo       
Google Custom Search
    AddThis Social Bookmark Button
-->

CVS: sbcl/src/pcl describe.lisp,1.15,1.16: msg#00069

Subject: CVS: sbcl/src/pcl describe.lisp,1.15,1.16
Update of /cvsroot/sbcl/sbcl/src/pcl
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7966/src/pcl

Modified Files:
        describe.lisp 
Log Message:
0.8.11.19: 
        DEFSTRUCT shouldn't issue warnings for FBOUNDP conflicts at 
                macroexpansion time. (at compile time or load time,
                OK, but not macroexpansion time)
        Make DESCRIBE on a gf report its method combination.
        manual fix from Brian Mastenbrook sbcl-devel 16 Jun 2004


Index: describe.lisp
===================================================================
RCS file: /cvsroot/sbcl/sbcl/src/pcl/describe.lisp,v
retrieving revision 1.15
retrieving revision 1.16
diff -u -d -r1.15 -r1.16
--- describe.lisp       6 Feb 2004 13:36:05 -0000       1.15
+++ describe.lisp       19 Jun 2004 21:42:49 -0000      1.16
@@ -92,9 +92,11 @@
 (defmethod describe-object ((fun standard-generic-function) stream)
   (format stream "~&~A is a generic function." fun)
   (when (documentation fun t)
-    (format stream "~&  Function documentation: ~A" (documentation fun t)))
+    (format stream "~&Its documentation is: ~A" (documentation fun t)))
   (format stream "~&Its lambda-list is:~&  ~S"
          (generic-function-pretty-arglist fun))
+  (format stream "~&Its method-combination is:~&  ~S"
+         (generic-function-method-combination fun))
   (let ((methods (generic-function-methods fun)))
     (if (null methods)
        (format stream "~&It has no methods.~%")



-------------------------------------------------------
This SF.Net email is sponsored by The 2004 JavaOne(SM) Conference
Learn from the experts at JavaOne(SM), Sun's Worldwide Java Developer
Conference, June 28 - July 1 at the Moscone Center in San Francisco, CA
REGISTER AND SAVE! http://java.sun.com/javaone/sf Priority Code NWMGYKND


<Prev in Thread] Current Thread [Next in Thread>