diff options
| author | Andrea Corallo <acorallo@gnu.org> | 2024-04-10 22:07:16 +0200 |
|---|---|---|
| committer | Andrea Corallo <acorallo@gnu.org> | 2024-04-29 19:27:28 +0200 |
| commit | fa0bf96837ad267e5259e531e3d592dd40fdc445 (patch) | |
| tree | 583865bd23a30a86560c860648f0fc18aa397f96 /lisp/emacs-lisp/regexp-opt.el | |
| parent | d8c941df7d8167fdec8cad562c095e27203f7818 (diff) | |
| download | emacs-fa0bf96837ad267e5259e531e3d592dd40fdc445.tar.gz emacs-fa0bf96837ad267e5259e531e3d592dd40fdc445.tar.bz2 emacs-fa0bf96837ad267e5259e531e3d592dd40fdc445.zip | |
Move lisp function arg type declarations to the functions itself
* lisp/emacs-lisp/comp-common.el (comp-primitive-type-specifiers):
Remove type declaration of lisp functions.
* lisp/window.el (get-lru-window, get-largest-window)
(one-window-p): Declare type.
* lisp/subr.el (ignore, error, zerop, fixnump, bignump, lsh)
(last, eventp, mouse-movement-p, log10, memory-limit)
(interactive-p): Likewise.
* lisp/simple.el (count-lines, mark, lax-plist-get): Likewise.
* lisp/files.el (parse-colon-path): Likewise.
* lisp/env.el (getenv): Likewise.
* lisp/emacs-lisp/regexp-opt.el (regexp-opt): Likewise.
* lisp/emacs-lisp/lisp.el (buffer-end): Likewise.
* lisp/emacs-lisp/comp.el (comp-hint-fixnum, comp-hint-cons): Likewise.
* lisp/custom.el (custom-variable-p): Likewise.
Diffstat (limited to 'lisp/emacs-lisp/regexp-opt.el')
| -rw-r--r-- | lisp/emacs-lisp/regexp-opt.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/regexp-opt.el b/lisp/emacs-lisp/regexp-opt.el index 59c1b7d8e10..076232bc613 100644 --- a/lisp/emacs-lisp/regexp-opt.el +++ b/lisp/emacs-lisp/regexp-opt.el @@ -130,7 +130,8 @@ usually more efficient than that of a simplified version: (concat (car parens) (mapconcat \\='regexp-quote strings \"\\\\|\") (cdr parens))))" - (declare (pure t) (side-effect-free t)) + (declare (type (function (list) string)) + (pure t) (side-effect-free t)) (save-match-data ;; Recurse on the sorted list. (let* ((max-lisp-eval-depth 10000) |