diff --git a/tools/build-world.sh b/tools/build-world.sh
index 19f01c7dfb59fa3514d5a6a6ab5f2db56a23ad8c..76ff688be24967c06626602add0dfb4bd986ea0d 100755
--- a/tools/build-world.sh
+++ b/tools/build-world.sh
@@ -42,23 +42,11 @@ $LISP "$@" -noinit -nositeinit <<EOF
 (load "target:tools/setup" :if-source-newer :load-source)
 (comf "target:tools/setup" :load t)
 
-(when (probe-file "home:.cmucl-fcn.lisp")
-  (compile-file "home:.cmucl-fcn" :output-file "/tmp/cmucl-fcn.fasl" :load t)
-  (pushnew #'rlt-before-gc-hook ext:*before-gc-hooks*)
-  (setf ext:*after-gc-hooks*
-	      (append ext:*after-gc-hooks* (list #'rlt-after-gc-hook))))
-
 (setq *gc-verbose* nil)
 (setq *interactive* nil)
 (setq debug:*debug-print-level* nil)
 (setq debug:*debug-print-length* nil)
 
-#+nil
-(when (probe-file "verify-hash.lisp")
-  (compile-file "verify-hash" :output-file "/tmp/verify-hash.fasl" :load t)
-  (setf ext:*after-gc-hooks*
-        (append ext:*after-gc-hooks* (list #'check-all-hashes))))
-
 (load "target:tools/worldcom")
 #-(or no-compiler runtime) (load "target:tools/comcom")
 ;; Compile at least new-genesis, so that genesis doesn't take ages