[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
feature/native-comp f21e1df 1/5: * Set relocation class as ephemeral in
From: |
Andrea Corallo |
Subject: |
feature/native-comp f21e1df 1/5: * Set relocation class as ephemeral in `comp-limplify-top-level' |
Date: |
Tue, 10 Mar 2020 08:39:41 -0400 (EDT) |
branch: feature/native-comp
commit f21e1dfc9f9addf66e6913cd30fbd7f922510ede
Author: AndreaCorallo <address@hidden>
Commit: Andrea Corallo <address@hidden>
* Set relocation class as ephemeral in `comp-limplify-top-level'
---
lisp/emacs-lisp/comp.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el
index f16aa59..808a705 100644
--- a/lisp/emacs-lisp/comp.el
+++ b/lisp/emacs-lisp/comp.el
@@ -1154,8 +1154,8 @@ functions 'top_level_run' will call back
`comp--register-subr'
into the C code forwarding the compilation unit."
;; Once an .eln is loaded and Emacs is dumped 'top_level_run' has no
;; reasons to be execute ever again. Therefore all objects can be
- ;; just impure.
- (let* ((comp-curr-allocation-class 'd-impure)
+ ;; just ephemeral.
+ (let* ((comp-curr-allocation-class 'd-ephemeral)
(func (make-comp-func :name 'top-level-run
:c-name "top_level_run"
:args (make-comp-args :min 1 :max 1)