Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!swrinde!elroy.jpl.nasa.gov!lll-winken!iggy.GW.Vitalink.COM!widener!dsinc!bagate!asi!disc.dla.mil!dsacg3.dsac.dla.mil!dsac.dla.mil!ntm1169
From: ntm1169@dsac.dla.mil (Mott Given)
Newsgroups: comp.lang.clos
Subject: Slot documentation
Keywords: slot
Message-ID: <2976@dsac.dla.mil>
Date: 20 Jun 91 16:20:19 GMT
Organization: Defense Logistics Agency Systems Automation Center, Columbus
Lines: 28


   I am posting this for Dr. Staley.

PCLers,

What is the preferred way to retrieve the documentation string from a slot?
I can use the following to get the class documentation:

;;;
;;; Class-Documentation
;;;

(defun Class-Documentation (x)
"Syntax: (Class-Documentation 'x)
Returns the class-documentation associated with the class named x. x is
a symbol (or evaluates) to a symbol naming a class; it is not a class object."
  (pprint (car (pcl::documentation (find-class x)))) t)

BUT I have not found a similarly easy way to get slot documentation. Thanks
in advance.

-Scott
-----------------------------------------------------------------------------
-- 
Mott Given @ Defense Logistics Agency Systems Automation Center,
             DSAC-TMP, Bldg. 27-1, P.O. Box 1605, Columbus, OH 43216-5002
INTERNET:  mgiven@dsac.dla.mil   UUCP: ...{osu-cis}!dsac!mgiven
Phone:  614-238-9431  AUTOVON: 850-9431   FAX: 614-238-9928 I speak for myself