scratch/no-purespace b86e4747e66 3/3: * Make again `comp--finalize-container' compilable

[Andrea Corallo]

branch: scratch/no-purespace
commit b86e4747e66febd400055cb6279238fb95f8a59d
Author: Andrea Corallo <acorallo@gnu.org>
Commit: Andrea Corallo <acorallo@gnu.org>

    * Make again `comp--finalize-container' compilable
    
    * lisp/emacs-lisp/comp.el (comp--finalize-container): Don't emit
    '--lambda-fixup' immediate in data relocations.
---
 lisp/emacs-lisp/comp.el | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el
index dbd14b2740d..ab6fd77f11a 100644
--- a/lisp/emacs-lisp/comp.el
+++ b/lisp/emacs-lisp/comp.el
@@ -3254,7 +3254,10 @@ Set it into the `type' slot."
                  ;; from the corresponding m-var.
                  collect (if (gethash obj
                                       (comp-ctxt-byte-func-to-func-h 
comp-ctxt))
-                             'lambda-fixup
+                             ;; Hack not to have `--lambda-fixup' in
+                             ;; data relocations as it would trigger the
+                             ;; check in 'check_comp_unit_relocs'.
+                             (intern (concat (make-string 1 ?-) 
"-lambda-fixup"))
                            obj))))
 
 (defun comp--finalize-relocs ()