X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=make-genesis-2.sh;h=38786bac8b35c93ab7a9d58be99a88197648f373;hb=aceb4720b6c1b0df6714e9648deb654ee291f051;hp=620e6800e356b793c07223647bae8e294935fa99;hpb=d7f6139a91d7d9b0667a597584ae306d958bb2f4;p=sbcl.git diff --git a/make-genesis-2.sh b/make-genesis-2.sh index 620e680..38786ba 100644 --- a/make-genesis-2.sh +++ b/make-genesis-2.sh @@ -44,18 +44,19 @@ $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) 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