diff options
| author | Mattias Engdegård <mattiase@acm.org> | 2022-07-21 12:18:59 +0200 |
|---|---|---|
| committer | Mattias Engdegård <mattiase@acm.org> | 2022-07-21 15:26:00 +0200 |
| commit | 0069085be2d0e6c7d439372b06b866df4c669891 (patch) | |
| tree | 05c1c21f6deb4eeb14df551fb131853f0d91a81b /lisp/emacs-lisp | |
| parent | 72278f21e0ef0c79f756bca08577297d11e22518 (diff) | |
| download | emacs-0069085be2d0e6c7d439372b06b866df4c669891.tar.gz emacs-0069085be2d0e6c7d439372b06b866df4c669891.tar.bz2 emacs-0069085be2d0e6c7d439372b06b866df4c669891.zip | |
; * lisp/emacs-lisp/byte-opt.el (byte-optimize--fixnump): Optimise.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/byte-opt.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el index a457e2044d8..5705b2a8fd7 100644 --- a/lisp/emacs-lisp/byte-opt.el +++ b/lisp/emacs-lisp/byte-opt.el @@ -921,7 +921,7 @@ for speeding up processing.") (defun byte-optimize--fixnump (o) "Return whether O is guaranteed to be a fixnum in all Emacsen. See Info node `(elisp) Integer Basics'." - (and (fixnump o) (<= -536870912 o 536870911))) + (and (integerp o) (<= -536870912 o 536870911))) (defun byte-optimize-equal (form) ;; Replace `equal' or `eql' with `eq' if at least one arg is a |