emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 0069085be2: ; * lisp/emacs-lisp/byte-opt.el (byte-optimize--fixnu


From: Mattias Engdegård
Subject: master 0069085be2: ; * lisp/emacs-lisp/byte-opt.el (byte-optimize--fixnump): Optimise.
Date: Thu, 21 Jul 2022 09:26:30 -0400 (EDT)

branch: master
commit 0069085be2d0e6c7d439372b06b866df4c669891
Author: Mattias Engdegård <mattiase@acm.org>
Commit: Mattias Engdegård <mattiase@acm.org>

    ; * lisp/emacs-lisp/byte-opt.el (byte-optimize--fixnump): Optimise.
---
 lisp/emacs-lisp/byte-opt.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el
index a457e2044d..5705b2a8fd 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



reply via email to

[Prev in Thread] Current Thread [Next in Thread]