X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=make-host-1.sh;h=cb551ac165f91615054ffa42276ff7a5eab746cb;hb=09957fcf57b49ed5ae5f05d62ad12d7ddbfd8e1d;hp=bde0ae5388abb4baa146955cecd4a39320c86eb5;hpb=d147d512602d761a2dcdfded506dd1a8f9a140dc;p=sbcl.git diff --git a/make-host-1.sh b/make-host-1.sh index bde0ae5..cb551ac 100644 --- a/make-host-1.sh +++ b/make-host-1.sh @@ -33,7 +33,6 @@ $SBCL_XC_HOST <<-'EOF' || exit 1 (load "src/cold/shared.lisp") (in-package "SB-COLD") (setf *host-obj-prefix* "obj/from-host/") - (load "src/cold/shared.lisp") (load "src/cold/set-up-cold-packages.lisp") (load "src/cold/defun-load-or-cload-xcompiler.lisp") (load-or-cload-xcompiler #'host-cload-stem) @@ -42,6 +41,6 @@ $SBCL_XC_HOST <<-'EOF' || exit 1 ;; to debug cross-compilation if it isn't.) (when (find :sb-test *shebang-features*) (load "tests/type.before-xc.lisp")) - (host-cload-stem "compiler/generic/genesis") + (host-cload-stem "src/compiler/generic/genesis") (sb!vm:genesis :c-header-file-name "src/runtime/sbcl.h") EOF