X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fcode%2Fcold-init.lisp;h=6d10a6a1246cf94cadcb32dd44424bd501a38db6;hb=4a466c4908db0f6f5c468ae0eabb500ffac07aba;hp=e5bce7acf84a68487628663d919b5236f76563c3;hpb=f3af39f1a29391c2cc9f3308bc0a9ea6d39fb8eb;p=sbcl.git

diff --git a/src/code/cold-init.lisp b/src/code/cold-init.lisp
index e5bce7a..6d10a6a 100644
--- a/src/code/cold-init.lisp
+++ b/src/code/cold-init.lisp
@@ -289,7 +289,7 @@ instead (which is another name for the same thing)."))
       (os-cold-init-or-reinit)
       (stream-reinit)
       (signal-cold-init-or-reinit)
-      (gc-cold-init-or-reinit)
+      (gc-reinit)
       (setf (sb!alien:extern-alien "internal_errors_enabled" boolean) t)
       (set-floating-point-modes :traps
 				'(:overflow