x86-64: Ensure that all base image code is immobile.

sbcl · Nov 22, 2016 · ed5d872 · ed5d872
1 parent c4d9023
commit ed5d872
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 1 deletion.
diff --git a/make-target-2-load.lisp b/make-target-2-load.lisp
@@ -84,6 +84,7 @@
   (loop (multiple-value-bind (winp symbol) (iter)
           (if winp (unintern symbol "CL-USER") (return)))))
 
+#+immobile-code (setq sb-c::*compile-to-memory-space* :dynamic)
 #+sb-fasteval (setq sb-ext:*evaluator-mode* :interpret)
 (sb-ext:save-lisp-and-die
  (progn

diff --git a/src/compiler/main.lisp b/src/compiler/main.lisp
@@ -572,7 +572,8 @@ necessary, since type inference may take arbitrarily long to converge.")
   ;; offers a choice. Because the collector does not run often enough (yet),
   ;; COMPILE usually places code in the dynamic space managed by our copying GC.
   ;; Change this variable if your application always demands immobile code.
-  (defvar *compile-to-memory-space* :dynamic)
+  ;; The real default is set to :DYNAMIC in make-target-2-load.lisp
+  (defvar *compile-to-memory-space* :immobile) ; BUILD-TIME default
   (defun code-immobile-p (node-or-component)
     (if (fasl-output-p *compile-object*)
         (neq (component-kind (if (node-p node-or-component)