X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=make-config.sh;h=40305067f36c44c22fa5b7162e9c4b06c8b97069;hb=HEAD;hp=3f58b71f83993cabd5e69c0093e2dd0557f7416e;hpb=eba7d5d4fdc9b2516c000eab73828c3ada89b894;p=sbcl.git diff --git a/make-config.sh b/make-config.sh index 3f58b71..4030506 100644 --- a/make-config.sh +++ b/make-config.sh @@ -1,4 +1,5 @@ #!/bin/sh +set -e # The make-config.sh script uses information about the target machine # to set things up for compilation. It's vaguely like a stripped-down @@ -16,150 +17,559 @@ # provided with absolutely no warranty. See the COPYING and CREDITS # files for more information. +print_help="no" + +# The classic form here was to use --userinit $DEVNULL --sysinit +# $DEVNULL, but that doesn't work on Win32 because SBCL doesn't handle +# device names properly. We still need $DEVNULL to be NUL on Win32 +# because it's used elsewhere (such as canonicalize-whitespace), so we +# need an alternate solution for the init file overrides. --no-foos +# have now been available long enough that this should not stop anyone +# from building. +if [ "$OSTYPE" = "cygwin" -o "$OSTYPE" = "msys" ] +then + SBCL_PREFIX="$PROGRAMFILES/sbcl" +else + SBCL_PREFIX="/usr/local" +fi +SBCL_XC_HOST="sbcl --disable-debugger --no-userinit --no-sysinit" +export SBCL_XC_HOST + +# Parse command-line options. +bad_option() { + echo $1 + echo "Enter \"$0 --help\" for list of valid options." + exit 1 +} + +WITH_FEATURES="" +WITHOUT_FEATURES="" +FANCY_FEATURES=":sb-core-compression :sb-xref-for-internals :sb-after-xc-core" + +fancy=false +some_options=false +for option +do + optarg_ok=true + # Split --foo=bar into --foo and bar. + case $option in + *=*) + # For ease of scripting skip valued options with empty + # values. + optarg=`expr "X$option" : '[^=]*=\(.*\)'` || optarg_ok=false + option=`expr "X$option" : 'X\([^=]*=\).*'` + ;; + --with*) + optarg=`expr "X$option" : 'X--[^-]*-\(.*\)'` \ + || bad_option "Malformed feature toggle: $option" + option=`expr "X$option" : 'X\(--[^-]*\).*'` + ;; + *) + optarg="" + ;; + esac + + case $option in + --help | -help | -h) + print_help="yes" ;; + --prefix=) + $optarg_ok && SBCL_PREFIX=$optarg + ;; + --arch=) + $oparg_ok && SBCL_ARCH=$optarg + ;; + --xc-host=) + $optarg_ok && SBCL_XC_HOST=$optarg + ;; + --dynamic-space-size=) + $optarg_ok && SBCL_DYNAMIC_SPACE_SIZE=$optarg + ;; + --with) + WITH_FEATURES="$WITH_FEATURES :$optarg" + ;; + --without) + WITHOUT_FEATURES="$WITHOUT_FEATURES :$optarg" + ;; + --fancy) + WITH_FEATURES="$WITH_FEATURES $FANCY_FEATURES" + # Lower down we add :sb-thread for platforms where it can be built. + fancy=true + ;; + -*) + bad_option "Unknown command-line option to $0: \"$option\"" + ;; + *) + if $some_options + then + bad_option "Unknown command-line option to $0: \"$option\"" + else + legacy_xc_spec=$option + fi + ;; + esac + some_options=true +done + +if (test -f customize-target-features.lisp && \ + (test -n "$WITH_FEATURES" || test -n "$WITHOUT_FEATURES")) +then + # Actually there's no reason why it would not work, but it would + # be confusing to say --with-thread only to have it turned off by + # customize-target-features.lisp... + echo "ERROR: Both customize-target-features.lisp, and feature-options" + echo "to make.sh present -- cannot use both at the same time." + exit 1 +fi + +# Previously XC host was provided as a positional argument. +if test -n "$legacy_xc_spec" +then + SBCL_XC_HOST="$legacy_xc_spec" +fi + +if test "$print_help" = "yes" +then + cat < Specify the install location. + + Script install.sh installs SBCL under the specified prefix + path: runtime as prefix/bin/sbcl, additional files under + prefix/lib/sbcl, and documentation under prefix/share. + + This option also affects the binaries: built-in default for + SBCL_HOME is: prefix/lib/sbcl/ + + Default prefix is: /usr/local + + --dynamic-space-size= Default dynamic-space size for target. + + This specifies the default dynamic-space size for the SBCL + being built. If you need to control the dynamic-space size + of the host SBCL, use the --xc-host option. + + If not provided, the default is platform-specific. is + taken to be megabytes unless explicitly suffixed with Gb in + order to specify the size in gigabytes. + + --with- Build with specified feature. + --without- Build wihout the specfied feature. + + --fancy Build with several optional features: + + $FANCY_FEATURES + + Plus threading on platforms which support it. + + --arch= Specify the architecture to build for. + + Mainly for doing x86 builds on x86-64. + + --xc-host= Specify the Common Lisp compilation host. + + The string provided should be a command to invoke the + cross-compilation Lisp system in such a way, that it reads + commands from standard input, and terminates when it reaches end + of file on standard input. + + Examples: + + "sbcl --disable-debugger --no-sysinit --no-userinit" + Use an existing SBCL binary as a cross-compilation + host even though you have stuff in your + initialization files which makes it behave in such a + non-standard way that it keeps the build from + working. Also disable the debugger instead of + waiting endlessly for a programmer to help it out + with input on *DEBUG-IO*. (This is the default.) + + "sbcl" + Use an existing SBCL binary as a cross-compilation + host, including your initialization files and + building with the debugger enabled. Not recommended + for casual users. + + "lisp -noinit -batch" + Use an existing CMU CL binary as a cross-compilation + host when you have weird things in your .cmucl-init + file. +EOF + exit 1 +fi + +# Running make.sh with different options without clean.sh in the middle +# can break things. +sh clean.sh + +mkdir -p output +# Save prefix for make and install.sh. +echo "SBCL_PREFIX='$SBCL_PREFIX'" > output/prefix.def +echo "$SBCL_DYNAMIC_SPACE_SIZE" > output/dynamic-space-size.txt + +# FIXME: Tweak this script, and the rest of the system, to support +# a second bootstrapping pass in which the cross-compilation host is +# known to be SBCL itself, so that the cross-compiler can do some +# optimizations (especially specializable arrays) that it doesn't +# know how to implement how in a portable way. (Or maybe that wouldn't +# require a second pass, just testing at build-the-cross-compiler time +# whether the cross-compilation host returns suitable values from +# UPGRADED-ARRAY-ELEMENT-TYPE?) + +if [ "$OSTYPE" = "cygwin" -o "$OSTYPE" = "msys" ] ; then + DEVNULL=NUL +else + DEVNULL=/dev/null +fi +export DEVNULL + +. ./find-gnumake.sh +find_gnumake + +. ./generate-version.sh +generate_version + +# Now that we've done our option parsing and found various +# dependencies, write them out to a file to be sourced by other +# scripts. + +echo "DEVNULL=\"$DEVNULL\"; export DEVNULL" > output/build-config +echo "GNUMAKE=\"$GNUMAKE\"; export GNUMAKE" >> output/build-config +echo "SBCL_XC_HOST=\"$SBCL_XC_HOST\"; export SBCL_XC_HOST" >> output/build-config +echo "legacy_xc_spec=\"$legacy_xc_spec\"; export legacy_xc_spec" >> output/build-config + +# And now, sorting out the per-target dependencies... + +case `uname` in + Linux) + sbcl_os="linux" + ;; + OSF1) + # it's changed name twice since it was called OSF/1: clearly + # the marketers forgot to tell the engineers about Digital Unix + # _or_ OSF/1 ... + sbcl_os="osf1" + ;; + *BSD) + case `uname` in + FreeBSD) + sbcl_os="freebsd" + ;; + OpenBSD) + sbcl_os="openbsd" + ;; + NetBSD) + sbcl_os="netbsd" + ;; + *) + echo unsupported BSD variant: `uname` + exit 1 + ;; + esac + ;; + Darwin) + sbcl_os="darwin" + ;; + SunOS) + sbcl_os="sunos" + ;; + CYGWIN* | WindowsNT | MINGW*) + sbcl_os="win32" + ;; + HP-UX) + sbcl_os="hpux" + ;; + *) + echo unsupported OS type: `uname` + exit 1 + ;; +esac + +link_or_copy() { + if [ "$sbcl_os" = "win32" ] ; then + # Use preprocessor or makefile includes instead of copying if + # possible, to avoid unexpected use of the original, unchanged + # files when re-running only make-target-1 during development. + if echo "$1" | egrep '[.][ch]$'; then + echo "#include \"$1\"" >"$2" + elif echo "$1" | egrep '^Config[.]'; then + echo "include $1" >"$2" + else + cp -r "$1" "$2" + fi + else + ln -s "$1" "$2" + fi +} + +remove_dir_safely() { + if [ "$sbcl_os" = "win32" ] ; then + if [ -d "$1" ] ; then + rm -rf "$1" + elif [ -e "$1" ] ; then + echo "I'm afraid to remove non-directory $1." + exit 1 + fi + else + if [ -h "$1" ] ; then + rm "$1" + elif [ -w "$1" ] ; then + echo "I'm afraid to replace non-symlink $1 with a symlink." + exit 1 + fi + fi +} + echo //entering make-config.sh echo //ensuring the existence of output/ directory if [ ! -d output ] ; then mkdir output; fi -ltf=`pwd`/local-target-features.lisp-expr -echo //initializing $ltf -echo ';;;; This is a machine-generated file.' > $ltf -echo ';;;; Please do not edit it by hand.' >> $ltf -echo ';;;; See make-config.sh.' >> $ltf -printf '(' >> $ltf - echo //guessing default target CPU architecture from host architecture -case `uname -m` in - *86|x86_64) guessed_sbcl_arch=x86 ;; +case `uname -m` in + *86) guessed_sbcl_arch=x86 ;; + i86pc) guessed_sbcl_arch=x86 ;; + *x86_64) guessed_sbcl_arch=x86-64 ;; + amd64) guessed_sbcl_arch=x86-64 ;; [Aa]lpha) guessed_sbcl_arch=alpha ;; sparc*) guessed_sbcl_arch=sparc ;; sun*) guessed_sbcl_arch=sparc ;; - ppc) guessed_sbcl_arch=ppc ;; + *ppc) guessed_sbcl_arch=ppc ;; + ppc64) guessed_sbcl_arch=ppc ;; Power*Macintosh) guessed_sbcl_arch=ppc ;; parisc) guessed_sbcl_arch=hppa ;; - mips) guessed_sbcl_arch=mips ;; + 9000/800) guessed_sbcl_arch=hppa ;; + mips*) guessed_sbcl_arch=mips ;; *) # If we're not building on a supported target architecture, we - # we have no guess, but it's not an error yet, since maybe - # target architecture will be specified explicitly below. - guessed_sbcl_arch='' - ;; + # we have no guess, but it's not an error yet, since maybe + # target architecture will be specified explicitly below. + guessed_sbcl_arch='' + ;; esac +# Under Solaris, uname -m returns "i86pc" even if CPU is amd64. +if [ "$sbcl_os" = "sunos" ] && [ `isainfo -k` = "amd64" ]; then + guessed_sbcl_arch=x86-64 +fi + +# Under Darwin, uname -m returns "i386" even if CPU is x86_64. +if [ "$sbcl_os" = "darwin" ] && [ "`/usr/sbin/sysctl -n hw.optional.x86_64`" = "1" ]; then + guessed_sbcl_arch=x86-64 +fi + echo //setting up CPU-architecture-dependent information +if test -n "$SBCL_ARCH" +then + # Normalize it. + SBCL_ARCH=`echo $SBCL_ARCH | tr '[A-Z]' '[a-z]' | tr _ -` +fi sbcl_arch=${SBCL_ARCH:-$guessed_sbcl_arch} echo sbcl_arch=\"$sbcl_arch\" if [ "$sbcl_arch" = "" ] ; then - echo "can't guess target SBCL architecture, need SBCL_ARCH environment var" + echo "can't guess target SBCL architecture, please specify --arch=" exit 1 fi -printf ":%s" "$sbcl_arch" >> $ltf - -for d in src/compiler src/assembly; do - echo //setting up symlink $d/target - original_dir=`pwd` - cd $d - if [ -h target ] ; then - rm target - elif [ -w target ] ; then - echo "I'm afraid to replace non-symlink $d/target with a symlink." - exit 1 - fi - if [ -d $sbcl_arch ] ; then - ln -s $sbcl_arch target - else - echo "missing sbcl_arch directory $PWD/$sbcl_arch" - exit 1 - fi - cd $original_dir -done - -echo //setting up symlink src/compiler/assembly -if [ -h src/compiler/assembly ] ; then - rm src/compiler/assembly -elif [ -w src/compiler/assembly ] ; then - echo "I'm afraid to replace non-symlink compiler/assembly with a symlink." - exit 1 +if $fancy +then + # If --fancy, enable threads on platforms where they can be built. + case $sbcl_arch in + x86|x86-64|ppc) + if [ "$sbcl_os" = "sunos" ] && [ "$sbcl_arch" = "x86-64" ] + then + echo "No threads on this platform." + else + WITH_FEATURES="$WITH_FEATURES :sb-thread" + echo "Enabling threads due to --fancy." + fi + ;; + *) + echo "No threads on this platform." + ;; + esac fi -ln -s ../assembly src/compiler/assembly + +ltf=`pwd`/local-target-features.lisp-expr +echo //initializing $ltf +echo ';;;; This is a machine-generated file.' > $ltf +echo ';;;; Please do not edit it by hand.' >> $ltf +echo ';;;; See make-config.sh.' >> $ltf +echo "((lambda (features) (set-difference features (list$WITHOUT_FEATURES)))" >> $ltf +printf " (union (list$WITH_FEATURES) (list " >> $ltf + +printf ":%s" "$sbcl_arch" >> $ltf echo //setting up OS-dependent information +# Under Darwin x86-64, guess whether Darwin 9+ or below. +if [ "$sbcl_os" = "darwin" ] && [ "$sbcl_arch" = "x86-64" ]; then + darwin_version=`uname -r` + darwin_version_major=${DARWIN_VERSION_MAJOR:-${darwin_version%%.*}} + if (( 8 < $darwin_version_major )); then + printf ' :inode64 :darwin9-or-better' >> $ltf + fi +fi + original_dir=`pwd` -cd src/runtime/ +cd ./src/runtime/ rm -f Config target-arch-os.h target-arch.h target-os.h target-lispregs.h # KLUDGE: these two logically belong in the previous section # ("architecture-dependent"); it seems silly to enforce this in terms # of the shell script, though. -- CSR, 2002-02-03 -ln -s $sbcl_arch-arch.h target-arch.h -ln -s $sbcl_arch-lispregs.h target-lispregs.h -case `uname` in - Linux) - printf ' :linux' >> $ltf - sbcl_os="linux" - if [ "`uname -m`" = "x86_64" ]; then - ln -s Config.x86_64-linux Config - else - ln -s Config.$sbcl_arch-linux Config - fi - ln -s $sbcl_arch-linux-os.h target-arch-os.h - ln -s linux-os.h target-os.h - ;; - OSF1) - # it's changed name twice since it was called OSF/1: clearly - # the marketers forgot to tell the engineers about Digital Unix - # _or_ OSF/1 ... - printf ' :osf1' >> $ltf - sbcl_os="osf1" - ln -s Config.$sbcl_arch-osf1 Config - ln -s $sbcl_arch-osf1-os.h target-arch-os.h - ln -s osf1-os.h target-os.h - ;; - *BSD) - printf ' :bsd' >> $ltf - ln -s $sbcl_arch-bsd-os.h target-arch-os.h - ln -s bsd-os.h target-os.h - case `uname` in - FreeBSD) - printf ' :freebsd' >> $ltf - sbcl_os="freebsd" - ln -s Config.$sbcl_arch-freebsd Config - ;; - OpenBSD) - printf ' :openbsd' >> $ltf - sbcl_os="openbsd" - ln -s Config.$sbcl_arch-openbsd Config +link_or_copy $sbcl_arch-arch.h target-arch.h +link_or_copy $sbcl_arch-lispregs.h target-lispregs.h +case "$sbcl_os" in + linux) + printf ' :unix' >> $ltf + printf ' :elf' >> $ltf + printf ' :linux' >> $ltf + + # If you add other platforms here, don't forget to edit + # src/runtime/Config.foo-linux too. + case "$sbcl_arch" in + mips) + printf ' :largefile' >> $ltf ;; - NetBSD) - printf ' :netbsd' >> $ltf - ln -s Config.$sbcl_arch-netbsd Config + x86 | x86-64) + printf ' :sb-thread :sb-futex :largefile' >> $ltf ;; - *) - echo unsupported BSD variant: `uname` - exit 1 + ppc) + printf ' :sb-futex' >> $ltf ;; - esac - ;; - Darwin) - printf ' :bsd' >> $ltf - sbcl_os="darwin" - ln -s $sbcl_arch-darwin-os.h target-arch-os.h - ln -s bsd-os.h target-os.h - printf ' :darwin' >> $ltf - ln -s Config.$sbcl_arch-darwin Config - ;; - SunOS) + esac + + if [ $sbcl_arch = "x86-64" ]; then + link_or_copy Config.x86_64-linux Config + else + link_or_copy Config.$sbcl_arch-linux Config + fi + link_or_copy $sbcl_arch-linux-os.h target-arch-os.h + link_or_copy linux-os.h target-os.h + ;; + osf1) + printf ' :unix' >> $ltf + printf ' :elf' >> $ltf + printf ' :osf1' >> $ltf + link_or_copy Config.$sbcl_arch-osf1 Config + link_or_copy $sbcl_arch-osf1-os.h target-arch-os.h + link_or_copy osf1-os.h target-os.h + ;; + hpux) + printf ' :unix' >> $ltf + printf ' :elf' >> $ltf + printf ' :hpux' >> $ltf + link_or_copy Config.$sbcl_arch-hpux Config + link_or_copy $sbcl_arch-hpux-os.h target-arch-os.h + link_or_copy hpux-os.h target-os.h + ;; + *bsd) + printf ' :unix' >> $ltf + printf ' :bsd' >> $ltf + link_or_copy $sbcl_arch-bsd-os.h target-arch-os.h + link_or_copy bsd-os.h target-os.h + case "$sbcl_os" in + freebsd) + printf ' :elf' >> $ltf + printf ' :freebsd' >> $ltf + printf ' :gcc-tls' >> $ltf + if [ $sbcl_arch = "x86" ]; then + printf ' :restore-fs-segment-register-from-tls' >> $ltf + fi + link_or_copy Config.$sbcl_arch-freebsd Config + ;; + openbsd) + printf ' :elf' >> $ltf + printf ' :openbsd' >> $ltf + link_or_copy Config.$sbcl_arch-openbsd Config + ;; + netbsd) + printf ' :netbsd' >> $ltf + printf ' :elf' >> $ltf + link_or_copy Config.$sbcl_arch-netbsd Config + ;; + *) + echo unsupported BSD variant: `uname` + exit 1 + ;; + esac + ;; + darwin) + printf ' :unix' >> $ltf + printf ' :mach-o' >> $ltf + printf ' :bsd' >> $ltf + printf ' :darwin' >> $ltf + if [ $sbcl_arch = "x86" ]; then + printf ' :mach-exception-handler :restore-fs-segment-register-from-tls :ud2-breakpoints' >> $ltf + fi + if [ $sbcl_arch = "x86-64" ]; then + printf ' :mach-exception-handler :ud2-breakpoints' >> $ltf + fi + link_or_copy $sbcl_arch-darwin-os.h target-arch-os.h + link_or_copy bsd-os.h target-os.h + link_or_copy Config.$sbcl_arch-darwin Config + ;; + sunos) + printf ' :unix' >> $ltf + printf ' :elf' >> $ltf printf ' :sunos' >> $ltf - sbcl_os="sunos" - ln -s Config.$sbcl_arch-sunos Config - ln -s $sbcl_arch-sunos-os.h target-arch-os.h - ln -s sunos-os.h target-os.h - ;; + if [ $sbcl_arch = "x86-64" ]; then + printf ' :largefile' >> $ltf + fi + link_or_copy Config.$sbcl_arch-sunos Config + link_or_copy $sbcl_arch-sunos-os.h target-arch-os.h + link_or_copy sunos-os.h target-os.h + ;; + win32) + printf ' :win32' >> $ltf + # + # Optional features -- We enable them by default, but the build + # ought to work perfectly without them: + # + printf ' :sb-futex' >> $ltf + printf ' :sb-qshow' >> $ltf + # + # Required features -- Some of these used to be optional, but + # building without them is no longer considered supported: + # + # (Of course it doesn't provide dlopen, but there is + # roughly-equivalent magic nevertheless:) + printf ' :sb-dynamic-core :os-provides-dlopen' >> $ltf + printf ' :sb-thread :sb-safepoint :sb-thruption :sb-wtimer' >> $ltf + printf ' :sb-safepoint-strictly' >> $ltf + # + link_or_copy Config.$sbcl_arch-win32 Config + link_or_copy $sbcl_arch-win32-os.h target-arch-os.h + link_or_copy win32-os.h target-os.h + ;; *) - echo unsupported OS type: `uname` - exit 1 - ;; + echo unsupported OS type: `uname` + exit 1 + ;; esac -cd $original_dir +cd "$original_dir" + +# FIXME: Things like :c-stack-grows-..., etc, should be +# *derived-target-features* or equivalent, so that there was a nicer +# way to specify them then sprinkling them in this file. They should +# still be tweakable by advanced users, though, but probably not +# appear in *features* of target. #!+/- should be adjusted to take +# them in account as well. At minimum the nicer specification stuff, +# though: +# +# (define-feature :dlopen (features) +# (union '(:bsd :linux :darwin :sunos) features)) +# +# (define-feature :c-stack-grows-downwards-not-upwards (features) +# (member :x86 features)) # KLUDGE: currently the x86 only works with the generational garbage # collector (indicated by the presence of :GENCGC in *FEATURES*) and @@ -169,40 +579,108 @@ cd $original_dir # base-target-features.lisp-expr, we add it into local-target-features # if we're building for x86. -- CSR, 2002-02-21 Then we do something # similar with :STACK-GROWS-FOOWARD, too. -- WHN 2002-03-03 -if [ "$sbcl_arch" = "x86" ] ; then +if [ "$sbcl_arch" = "x86" ]; then printf ' :gencgc :stack-grows-downward-not-upward :c-stack-is-control-stack' >> $ltf -elif [ "$sbcl_arch" = "mips" ] ; then - # Use a little C program to try to guess the endianness. Ware - # cross-compilers! - $GNUMAKE -C tools-for-build determine-endianness - tools-for-build/determine-endianness >> $ltf -elif [ "$sbcl_arch" = "ppc" -a "$sbcl_os" = "linux" ]; then - # Use a C program to detect which kind of glibc we're building on, - # to bandage across the break in source compatibility between - # versions 2.3.1 and 2.3.2 - $GNUMAKE -C tools-for-build where-is-mcontext - tools-for-build/where-is-mcontext > src/runtime/ppc-linux-mcontext.h -elif [ "$sbcl_arch" = "ppc" -a "$sbcl_os" = "darwin" ]; then - # The default stack ulimit under darwin is too small to run PURIFY. - # Best we can do is complain and exit at this stage - if [ "`ulimit -s`" = "512" ]; then - echo "Your stack size limit is too small to build SBCL." - echo "See the limit(1) or ulimit(1) commands and the README file." - exit 1 + printf ' :compare-and-swap-vops :unwind-to-frame-and-call-vop :raw-instance-init-vops' >> $ltf + printf ' :stack-allocatable-closures :stack-allocatable-vectors' >> $ltf + printf ' :stack-allocatable-lists :stack-allocatable-fixed-objects' >> $ltf + printf ' :alien-callbacks :cycle-counter :inline-constants ' >> $ltf + printf ' :memory-barrier-vops :multiply-high-vops :ash-right-vops' >> $ltf + case "$sbcl_os" in + linux | freebsd | netbsd | openbsd | sunos | darwin | win32) + printf ' :linkage-table' >> $ltf + esac + if [ "$sbcl_os" = "win32" ]; then + # of course it doesn't provide dlopen, but there is + # roughly-equivalent magic nevertheless. + printf ' :os-provides-dlopen' >> $ltf + fi + if [ "$sbcl_os" = "openbsd" ]; then + rm -f src/runtime/openbsd-sigcontext.h + sh tools-for-build/openbsd-sigcontext.sh > src/runtime/openbsd-sigcontext.h + fi +elif [ "$sbcl_arch" = "x86-64" ]; then + printf ' :gencgc :stack-grows-downward-not-upward :c-stack-is-control-stack :linkage-table' >> $ltf + printf ' :compare-and-swap-vops :unwind-to-frame-and-call-vop :raw-instance-init-vops' >> $ltf + printf ' :stack-allocatable-closures :stack-allocatable-vectors' >> $ltf + printf ' :stack-allocatable-lists :stack-allocatable-fixed-objects' >> $ltf + printf ' :alien-callbacks :cycle-counter :complex-float-vops' >> $ltf + printf ' :float-eql-vops :inline-constants :memory-barrier-vops' >> $ltf + printf ' :multiply-high-vops :sb-simd-pack :ash-right-vops' >> $ltf +elif [ "$sbcl_arch" = "mips" ]; then + printf ' :cheneygc :linkage-table' >> $ltf + printf ' :stack-allocatable-closures :stack-allocatable-vectors' >> $ltf + printf ' :stack-allocatable-lists :stack-allocatable-fixed-objects' >> $ltf + printf ' :alien-callbacks' >> $ltf +elif [ "$sbcl_arch" = "ppc" ]; then + printf ' :gencgc :stack-allocatable-closures :stack-allocatable-vectors' >> $ltf + printf ' :stack-allocatable-lists :stack-allocatable-fixed-objects' >> $ltf + printf ' :linkage-table :raw-instance-init-vops :memory-barrier-vops' >> $ltf + printf ' :compare-and-swap-vops :multiply-high-vops' >> $ltf + if [ "$sbcl_os" = "linux" ]; then + # Use a C program to detect which kind of glibc we're building on, + # to bandage across the break in source compatibility between + # versions 2.3.1 and 2.3.2 + # + # FIXME: integrate to grovel-features, mayhaps + $GNUMAKE -C tools-for-build where-is-mcontext -I ../src/runtime + tools-for-build/where-is-mcontext > src/runtime/ppc-linux-mcontext.h || (echo "error running where-is-mcontext"; exit 1) + elif [ "$sbcl_os" = "darwin" ]; then + # We provide a dlopen shim, so a little lie won't hurt + printf " :os-provides-dlopen :alien-callbacks" >> $ltf + # The default stack ulimit under darwin is too small to run PURIFY. + # Best we can do is complain and exit at this stage + if [ "`ulimit -s`" = "512" ]; then + echo "Your stack size limit is too small to build SBCL." + echo "See the limit(1) or ulimit(1) commands and the README file." + exit 1 + fi fi elif [ "$sbcl_arch" = "sparc" ]; then - # Test the compiler in order to see if we are building on Sun + # Test the compiler in order to see if we are building on Sun # toolchain as opposed to GNU binutils, and write the appropriate - # FUNCDEF macro for assembler. No harm in running this on sparc-linux + # FUNCDEF macro for assembler. No harm in running this on sparc-linux # as well. sh tools-for-build/sparc-funcdef.sh > src/runtime/sparc-funcdef.h + if [ "$sbcl_os" = "sunos" ] || [ "$sbcl_os" = "linux" ]; then + printf ' :gencgc' >> $ltf + else + echo '***' + echo '*** You are running SPARC on non-SunOS, non-Linux. Since' + echo '*** GENCGC is untested on this combination, make-config.sh' + echo '*** is falling back to CHENEYGC. Please consider adjusting' + echo '*** parms.lisp to build with GENCGC instead.' + echo '***' + printf ' :cheneygc' >> $ltf + fi + if [ "$sbcl_os" = "sunos" ] || [ "$sbcl_os" = "linux" ]; then + printf ' :linkage-table' >> $ltf + fi + printf ' :stack-allocatable-closures :stack-allocatable-lists' >> $ltf +elif [ "$sbcl_arch" = "alpha" ]; then + printf ' :cheneygc' >> $ltf + printf ' :stack-allocatable-closures :stack-allocatable-lists' >> $ltf +elif [ "$sbcl_arch" = "hppa" ]; then + printf ' :cheneygc' >> $ltf + printf ' :stack-allocatable-vectors :stack-allocatable-fixed-objects' >> $ltf + printf ' :stack-allocatable-lists' >> $ltf else # Nothing need be done in this case, but sh syntax wants a placeholder. echo > /dev/null fi +# Use a little C program to try to guess the endianness. Ware +# cross-compilers! +# +# FIXME: integrate to grovel-features, mayhaps +$GNUMAKE -C tools-for-build determine-endianness -I ../src/runtime +tools-for-build/determine-endianness >> $ltf + +export sbcl_os sbcl_arch +sh tools-for-build/grovel-features.sh >> $ltf + echo //finishing $ltf -echo ')' >> $ltf +echo ')))' >> $ltf # FIXME: The version system should probably be redone along these lines: # @@ -219,4 +697,3 @@ if [ `uname` = "SunOS" ] ; then PATH=/usr/xpg4/bin:$PATH fi echo '"'`hostname`-`id -un`-`date +%Y-%m-%d-%H-%M-%S`'"' > output/build-id.tmp -