X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=make-target-2.sh;h=507ddf097df45a3717c3fd070cfcbde58cfe8837;hb=df679ed627975948b1cee190f4d79c397588c43e;hp=bcfef1be70e9811e508e9ee49cb74e9e085f3000;hpb=2010727926b091b23a246f6f659be61e27e19667;p=sbcl.git

diff --git a/make-target-2.sh b/make-target-2.sh
index bcfef1b..507ddf0 100644
--- a/make-target-2.sh
+++ b/make-target-2.sh
@@ -84,5 +84,8 @@ echo //doing warm init
 	;; not wanted by default after build is complete. (And if it's
 	;; wanted, it can easily be turned back on.)
 	#+sb-show (setf sb-int:*/show* nil)
+        ;; The system is complete now, all standard functions are
+        ;; defined.
+        (setq sb-c::*flame-on-necessarily-undefined-function* t)
 	(sb-ext:save-lisp-and-die "output/sbcl.core" :purify t)
 	EOF