mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-08 02:40:17 +02:00
Code Activity

object-documentation knows about programs

Browse source 
* ice-9/documentation.scm (object-documentation): Add hooks for getting
  documentation for compiled procedures, too. (Goops would be helpful
  here.)
This commit is contained in:
Andy Wingo 2008-09-30 20:18:57 +02:00
parent 3b573ef4a5
commit 8befde009a
1 changed files with 3 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

3
ice-9/documentation.scm
View file

@ -80,6 +80,7 @@
(define-module (ice-9 documentation)
:use-module (ice-9 rdelim)
:use-module ((system vm program) :select (program? program-documentation))
:export (file-commentary
documentation-files search-documentation-files
object-documentation)
@ -201,6 +202,8 @@ OBJECT can be a procedure, macro or any object that has its
(and transformer
(proc-doc transformer))))
(object-property object 'documentation)
(and (program? object)
(program-documentation object))
(and (procedure? object)
(not (closure? object))
(procedure-name object)