X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=make-genesis-2.sh;h=42efb07a955287154f5daa60462ca9404cefcbab;hb=1bbd405c3c21f93db7aa956946738c8a3f30837d;hp=551a34fcacaa0d2fc7f9de1aba350ca3abcecb06;hpb=6c4d4d984b1af6b2a73568cec3ab9c8795cff2da;p=sbcl.git

diff --git a/make-genesis-2.sh b/make-genesis-2.sh
index 551a34f..42efb07 100644
--- a/make-genesis-2.sh
+++ b/make-genesis-2.sh
@@ -44,19 +44,20 @@ $SBCL_XC_HOST <<-'EOF' || exit 1
 	    (read s)))
 	(host-load-stem "src/compiler/generic/genesis")
 	(sb!vm:genesis :object-file-names *target-object-file-names*
-		       :c-header-file-name "output/sbcl2.h"
+		       :c-header-dir-name "output/genesis-2"
 		       :symbol-table-file-name "src/runtime/sbcl.nm"
 		       :core-file-name "output/cold-sbcl.core"
 		       ;; The map file is not needed by the system, but can
 		       ;; be very handy when debugging cold init problems.
 		       :map-file-name "output/cold-sbcl.map")
         #+cmu (ext:quit)
+        #+clisp (ext:quit)
 	EOF
 
 echo //testing for consistency of first and second GENESIS passes
-if cmp src/runtime/sbcl.h output/sbcl2.h; then
-    echo //sbcl2.h matches sbcl.h -- good.
+if diff -r src/runtime/genesis output/genesis-2; then
+    echo //header files match between first and second GENESIS -- good
 else
-    echo error: sbcl2.h does not match sbcl.h.
+    echo error: header files do not match between first and second GENESIS
     exit 1
 fi