From 5fe7c47dc2ae726550b1a4d117d7a24b61915adf Mon Sep 17 00:00:00 2001 From: rtoy <rtoy> Date: Thu, 15 Apr 2004 14:12:23 +0000 Subject: [PATCH] Remove some junk that was inadvertently checked in. --- tools/build-world.sh | 12 ------------ 1 file changed, 12 deletions(-) diff --git a/tools/build-world.sh b/tools/build-world.sh index 19f01c7df..76ff688be 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 -- GitLab