emacs-diffs
[Top][All Lists]
Advanced

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

scratch/bytecode-speedup 02ff30bfbb 06/11: ; * src/bytecode.c (exec_byte


From: Mattias Engdegård
Subject: scratch/bytecode-speedup 02ff30bfbb 06/11: ; * src/bytecode.c (exec_byte_code): Cosmetic improvement
Date: Tue, 11 Jan 2022 11:50:48 -0500 (EST)

branch: scratch/bytecode-speedup
commit 02ff30bfbb2b7c731c96110af84d2585211125ba
Author: Mattias Engdegård <mattiase@acm.org>
Commit: Mattias Engdegård <mattiase@acm.org>

    ; * src/bytecode.c (exec_byte_code): Cosmetic improvement
    
    Implement point_max in the same way as point_min.
---
 src/bytecode.c | 8 ++------
 1 file changed, 2 insertions(+), 6 deletions(-)

diff --git a/src/bytecode.c b/src/bytecode.c
index 2b017f0e8d..9e31da79a0 100644
--- a/src/bytecode.c
+++ b/src/bytecode.c
@@ -1212,12 +1212,8 @@ exec_byte_code (Lisp_Object bytestr, Lisp_Object vector, 
Lisp_Object maxdepth,
          NEXT;
 
        CASE (Bpoint_max):
-         {
-           Lisp_Object v1;
-           XSETFASTINT (v1, ZV);
-           PUSH (v1);
-           NEXT;
-         }
+         PUSH (make_fixed_natnum (ZV));
+         NEXT;
 
        CASE (Bpoint_min):
          PUSH (make_fixed_natnum (BEGV));



reply via email to

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