X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fcold-init.lisp;h=07af1593d2f992ce35a99fa72c63f5dc91841769;hb=25fe91bf63fd473d9316675b0e0ca9be0079e9eb;hp=6bb7b33fd4b4db00de1c96c7a0d46bcfda827e8a;hpb=2b90fd1dbad23322258222a2ef4cef7f6a00831d;p=sbcl.git

diff --git a/src/code/cold-init.lisp b/src/code/cold-init.lisp
index 6bb7b33..07af159 100644
--- a/src/code/cold-init.lisp
+++ b/src/code/cold-init.lisp
@@ -102,7 +102,8 @@
         *maximum-error-depth* 10
         *current-error-depth* 0
         *cold-init-complete-p* nil
-        *type-system-initialized* nil)
+        *type-system-initialized* nil
+        sb!vm:*alloc-signal* nil)
 
   ;; I'm not sure where eval is first called, so I put this first.
   #!+sb-eval