Make 'describe-function' say "byte-compiled" when appropriate
* lisp/help-fns.el (help-fns-function-description-header): Say "byte-compiled" when describing byte-compiled functions.
This commit is contained in:
parent
2b31e667be
commit
25bc330a6d
1 changed files with 2 additions and 2 deletions
|
@ -874,7 +874,7 @@ Returns a list of the form (REAL-FUNCTION DEF ALIASED REAL-DEF)."
|
|||
(aliased
|
||||
(format-message "an alias for `%s'" real-def))
|
||||
((subr-native-elisp-p def)
|
||||
(concat beg "native compiled Lisp function"))
|
||||
(concat beg "native-compiled Lisp function"))
|
||||
((subrp def)
|
||||
(concat beg (if (eq 'unevalled (cdr (subr-arity def)))
|
||||
"special form"
|
||||
|
@ -893,7 +893,7 @@ Returns a list of the form (REAL-FUNCTION DEF ALIASED REAL-DEF)."
|
|||
(macrop function))
|
||||
(concat beg "Lisp macro"))
|
||||
((byte-code-function-p def)
|
||||
(concat beg "compiled Lisp function"))
|
||||
(concat beg "byte-compiled Lisp function"))
|
||||
((module-function-p def)
|
||||
(concat beg "module function"))
|
||||
((eq (car-safe def) 'lambda)
|
||||
|
|
Loading…
Add table
Reference in a new issue