Fix (documentation #'function t)
authorStas Boukarev <stassats@gmail.com>
Mon, 4 Feb 2013 11:21:22 +0000 (15:21 +0400)
committerStas Boukarev <stassats@gmail.com>
Mon, 4 Feb 2013 11:21:22 +0000 (15:21 +0400)
commit2e52fa0553c5a256f482ee14e30608acf55e5f48
tree223fd032e06b6bd59b5078b128a46fb3707b0903
parentbcd323c39d6f5f80020ba4a5d9eb8d348c6cc499
Fix (documentation #'function t)

(defun test () "xx" nil)
(setf (documentation 'test 'function) "test")
(list (documentation #'test t) (documentation 'test 'function)))
returned ("xx" "test").
NEWS
src/pcl/documentation.lisp
tests/interface.impure.lisp