Commit de1b587d authored by Daniel Kochmański's avatar Daniel Kochmański
Browse files

define-compiler-macro: fix the documentation expansion

Previously it set the documentation slot for the function - it should do
it for the compiler-macro. Fixes #658.
parent 1c7ca7ac
......@@ -131,7 +131,7 @@ VARIABLE doc and can be retrieved by (DOCUMENTATION 'SYMBOL 'VARIABLE)."
(setq function `(si::bc-disassemble ,function)))
`(progn
(put-sysprop ',name 'sys::compiler-macro ,function)
,@(si::expand-set-documentation name 'function doc-string)
,@(si::expand-set-documentation name 'compiler-macro doc-string)
,(ext:register-with-pde whole)
',name)))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment