diff options
author | Andrea Corallo <akrl@sdf.org> | 2020-04-13 20:43:21 +0100 |
---|---|---|
committer | Andrea Corallo <akrl@sdf.org> | 2020-04-13 20:44:09 +0100 |
commit | b7678cf10e13727dab300c7162649cafc488e27e (patch) | |
tree | d181bf3b0774b629e29d24bb9c218f2fddb39a2a /lisp/emacs-lisp/comp.el | |
parent | 9f42f35418c568ae22eca65ecec773ff40f2fc0e (diff) | |
download | emacs-b7678cf10e13727dab300c7162649cafc488e27e.tar.gz emacs-b7678cf10e13727dab300c7162649cafc488e27e.tar.bz2 emacs-b7678cf10e13727dab300c7162649cafc488e27e.zip |
* lisp/emacs-lisp/comp.el (comp-finalize-relocs): Better commentary.
Diffstat (limited to 'lisp/emacs-lisp/comp.el')
-rw-r--r-- | lisp/emacs-lisp/comp.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el index a4764f91c3a..fda8f7dc780 100644 --- a/lisp/emacs-lisp/comp.el +++ b/lisp/emacs-lisp/comp.el @@ -2082,11 +2082,11 @@ Update all insn accordingly." (d-impure-idx (comp-data-container-idx d-impure)) (d-ephemeral (comp-ctxt-d-ephemeral comp-ctxt)) (d-ephemeral-idx (comp-data-container-idx d-ephemeral))) - ;; Remove things in d-impure that are already in d-default. + ;; Remove entries in d-impure already present in d-default. (cl-loop for obj being each hash-keys of d-impure-idx when (gethash obj d-default-idx) do (remhash obj d-impure-idx)) - ;; Remove things in d-ephemeral that are already in d-default or + ;; Remove entries in d-ephemeral already present in d-default or ;; d-impure. (cl-loop for obj being each hash-keys of d-ephemeral-idx when (or (gethash obj d-default-idx) (gethash obj d-impure-idx)) |