emacs-diffs
[Top][All Lists]
Advanced

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

scratch/comp-static-data 87909765da7 13/16: comp.el: Avoid unnecessary a


From: Vibhav Pant
Subject: scratch/comp-static-data 87909765da7 13/16: comp.el: Avoid unnecessary allocation of byte-code forms.
Date: Thu, 19 Jan 2023 12:44:47 -0500 (EST)

branch: scratch/comp-static-data
commit 87909765da7877330a2fb1d08fda2c19230b1368
Author: Vibhav Pant <vibhavp@gmail.com>
Commit: Vibhav Pant <vibhavp@gmail.com>

    comp.el: Avoid unnecessary allocation of byte-code forms.
    
    * lisp/emacs-lisp/comp.el (comp-spill-lap-function): Don't emit
    byte-code forms as calls to 'make-byte-code' to avoid an unnecessary
    function call/allocation.
---
 lisp/emacs-lisp/comp.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el
index 29c00fa2e11..278f499a894 100644
--- a/lisp/emacs-lisp/comp.el
+++ b/lisp/emacs-lisp/comp.el
@@ -1407,7 +1407,7 @@ clashes."
                (make-byte-to-native-top-level
                 :form `(defalias
                          ',(byte-to-native-func-def-name form)
-                         (make-byte-code ,@(seq-into byte-code 'list))
+                         ,byte-code
                          nil)
                 :lexical (comp-lex-byte-func-p byte-code)))
            form)))



reply via email to

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