summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/comp.el
diff options
context:
space:
mode:
authorAndrea Corallo <acorallo@gnu.org>2024-05-31 17:00:50 +0200
committerAndrea Corallo <acorallo@gnu.org>2024-06-03 17:55:16 +0200
commite39e96c9b93cf99d50f99f3e0593cbfbf0ac758d (patch)
tree36e982bc3bfeb99cb43b3a7f8070009448f92bf1 /lisp/emacs-lisp/comp.el
parent876bd6506d78392d7f6b8d13df678da21ad05af9 (diff)
downloademacs-e39e96c9b93cf99d50f99f3e0593cbfbf0ac758d.tar.gz
emacs-e39e96c9b93cf99d50f99f3e0593cbfbf0ac758d.tar.bz2
emacs-e39e96c9b93cf99d50f99f3e0593cbfbf0ac758d.zip
* lisp/emacs-lisp/comp.el (native-compile): Type declare.
Diffstat (limited to 'lisp/emacs-lisp/comp.el')
-rw-r--r--lisp/emacs-lisp/comp.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el
index 32d4442ca1b..1627294199a 100644
--- a/lisp/emacs-lisp/comp.el
+++ b/lisp/emacs-lisp/comp.el
@@ -3583,6 +3583,8 @@ is a filename, if the compilation was successful return the
filename of the compiled object. If FUNCTION-OR-FILE is a
function symbol or a form, if the compilation was successful
return the compiled function."
+ (declare (ftype (function ((or string symbol) &optional string)
+ (or native-comp-function string))))
(comp--native-compile function-or-file nil output))
;;;###autoload