* Set relocation class as ephemeral in `comp-limplify-top-level'

This commit is contained in:
AndreaCorallo 2020-03-09 17:35:07 +00:00 committed by Andrea Corallo
parent 87ee6ff4eb
commit f21e1dfc9f

View file

@ -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)