Ignore:
Timestamp:
03/03/09 22:10:25 (13 years ago)
Author:
ehuelsmann
Message:

Fix DESCRIBE output by registering documentation on functions.

Patch by: Russell McManus? (russel_mcmanus@…)
Tweaked by: me

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/abcl/src/org/armedbear/lisp/precompiler.lisp

    r11479 r11695  
    11841184             (when (null env)
    11851185               (setf lambda-expression (precompile-form lambda-expression nil)))
    1186              `(%defun ',name ,lambda-expression))))))
     1186             `(progn
     1187                (%defun ',name ,lambda-expression)
     1188                ,@(when doc
     1189                    `((%set-documentation ',name 'function ,doc)))))))))
Note: See TracChangeset for help on using the changeset viewer.