Handle (complex (member not-a-real)) types.
[sbcl.git] / make-c-runtime.sh
blob7e83c9a33941e2ece8e8d8123058bf540a3f3f73
1 #!/bin/sh
3 # Load our build configuration
4 . output/build-config
6 time $SBCL_XC_HOST <<EOF
7 (load "src/cold/shared.lisp")
8 (load "src/cold/set-up-cold-packages.lisp")
9 (in-package "SB-COLD")
10 (in-host-compilation-mode
11 (lambda (&aux (*features* (cons :c-headers-only *features*)))
12 (do-stems-and-flags (stem flags)
13 (when (member :c-headers flags)
14 (handler-bind ((style-warning (function muffle-warning)))
15 (load (merge-pathnames (stem-remap-target stem) ".lisp")))))
16 (load "src/compiler/generic/genesis.lisp")))
17 (genesis :c-header-dir-name "src/runtime/genesis/" :verbose nil)
18 EOF
20 diff -r output/genesis-2 src/runtime/genesis
22 (cd src/runtime ; make)