X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=make-target-2.sh;h=a5ee9faf7bd038ae4afc0cf710ab08188588fdf5;hb=c27ee1dba86042cb431c298699c19ed3fcd70026;hp=fb1c8c1e3aaf71bd12acf0e2ac22955acaf957c7;hpb=eb105cf1d0fdb3769fea9f7a4df29ce82e93189b;p=sbcl.git

diff --git a/make-target-2.sh b/make-target-2.sh
index fb1c8c1..a5ee9fa 100644
--- a/make-target-2.sh
+++ b/make-target-2.sh
@@ -65,6 +65,7 @@ echo //doing warm init
 	;; (GC :FULL T gets us down to about 38 Mbytes, but PURIFY
 	;; gets us down to about 19 Mbytes.)
 	(sb-int:/show "done with warm.lisp, about to GC :FULL T")
+	(sb-c::pack-before-gc-hook) ; KLUDGE
 	(gc :full t)
 
         ;; resetting compilation policy to neutral values in