emacs-diffs
[Top][All Lists]
Advanced

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

scratch/bytecode-speedup 26d97dcae9 3/3: ; * src/bytecode.c (exec_byte_c


From: Mattias Engdegård
Subject: scratch/bytecode-speedup 26d97dcae9 3/3: ; * src/bytecode.c (exec_byte_code): better variable naming
Date: Thu, 20 Jan 2022 16:25:07 -0500 (EST)

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

    ; * src/bytecode.c (exec_byte_code): better variable naming
---
 src/bytecode.c | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/src/bytecode.c b/src/bytecode.c
index 0bca2546f7..3593bb9474 100644
--- a/src/bytecode.c
+++ b/src/bytecode.c
@@ -1434,23 +1434,23 @@ exec_byte_code (Lisp_Object bytestr, Lisp_Object 
vector, Lisp_Object maxdepth,
 
        CASE (Bsetcar):
          {
-           Lisp_Object newcar = POP;
+           Lisp_Object newval = POP;
            Lisp_Object cell = TOP;
            CHECK_CONS (cell);
            CHECK_IMPURE (cell, XCONS (cell));
-           XSETCAR (cell, newcar);
-           TOP = newcar;
+           XSETCAR (cell, newval);
+           TOP = newval;
            NEXT;
          }
 
        CASE (Bsetcdr):
          {
-           Lisp_Object newcar = POP;
+           Lisp_Object newval = POP;
            Lisp_Object cell = TOP;
            CHECK_CONS (cell);
            CHECK_IMPURE (cell, XCONS (cell));
-           XSETCDR (cell, newcar);
-           TOP = newcar;
+           XSETCDR (cell, newval);
+           TOP = newval;
            NEXT;
          }
 



reply via email to

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