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.

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index f78c6ab0dfac0267ea7ebc00f63c804de12ca4f6..6a7951d160e03432476d2f3ae1d938f0e68dcae0 100644 (file)
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -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)