From: Eli Zaretskii Date: Mon, 14 Aug 2023 15:08:54 +0000 (+0300) Subject: Fix slow "C-h f" in Emacs built without native compilation X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=545f95d1a3213318389ecadc7cfff3f48b555b03;p=emacs.git Fix slow "C-h f" in Emacs built without native compilation * lisp/help-fns.el (help-fns--signature): Don't try calling 'comp-function-type-spec' if Emacs was built without native compilation. (Bug#65250) --- diff --git a/lisp/help-fns.el b/lisp/help-fns.el index fc8f431fd11..bedc5a9e49b 100644 --- a/lisp/help-fns.el +++ b/lisp/help-fns.el @@ -715,7 +715,8 @@ the C sources, too." (unless (and (symbolp function) (get function 'reader-construct)) (insert high-usage "\n") - (when-let* ((res (comp-function-type-spec function)) + (when-let* ((res (and (native-comp-available-p) + (comp-function-type-spec function))) (type-spec (car res)) (kind (cdr res))) (insert (format