X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fcold-init.lisp;h=9e3359ed3ee0f026cfe38391132e0f74dcaf7112;hb=2419deec84b45d81610dc8d3db610c3e2f7b9486;hp=dd51ecf17fb559d5c23d105e86651b3645fc189e;hpb=afb56ab2865fdb72102a9bb6b2c846b7b5a6ad7e;p=sbcl.git

diff --git a/src/code/cold-init.lisp b/src/code/cold-init.lisp
index dd51ecf..9e3359e 100644
--- a/src/code/cold-init.lisp
+++ b/src/code/cold-init.lisp
@@ -104,7 +104,8 @@
         *current-error-depth* 0
         *cold-init-complete-p* nil
         *type-system-initialized* nil
-        sb!vm:*alloc-signal* nil)
+        sb!vm:*alloc-signal* nil
+        sb!kernel::*gc-epoch* (cons nil nil))
 
   ;; I'm not sure where eval is first called, so I put this first.
   #!+sb-eval