--- gforth/configure.in 2001/05/01 14:35:00 1.81 +++ gforth/configure.in 2002/12/27 12:32:52 1.94 @@ -18,34 +18,26 @@ dnl Process this file with autoconf to p #along with this program; if not, write to the Free Software #Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111, USA. -AC_INIT(engine/engine.c) - dnl We use some automake macros here, dnl but don't use automake for creating Makefile.in -AM_INIT_AUTOMAKE(gforth,0.5.9-20010501) +AC_INIT(gforth,0.5.9-20021227,https://savannah.gnu.org/bugs/?func=addbug&group=gforth) #snapshots have numbers major.minor.release-YYYYMMDD -#note that lexicographic ordering bust be heeded. +#note that lexicographic ordering must be heeded. #I.e., 0.4.1-YYYYMMDD must not exist before 0.4.1! -AM_CONFIG_HEADER(engine/config.h) -#AM_CYGWIN32 +UPDATED="27 December 2002" +AC_SUBST(UPDATED) +AC_CONFIG_HEADERS(engine/config.h) +dnl AM_CYGWIN32 + +#default setting that may be changed later: +no_dynamic_default=0 AC_ARG_ENABLE(force-reg, [ --enable-force-reg Use explicit register declarations if they appear in the machine.h file. This can cause a good speedup, but also incorrect code with some gcc versions on some processors (default disabled).], -AC_DEFINE(FORCE_REG)) -dnl this is not quite according to the autoconf manual, it causes a replacement -AC_ARG_ENABLE(direct-threaded, -[ --enable-direct-threaded Force direct threading. This may not work on - some machines and may cause slowdown on others. - (default processor-dependent)], -AC_DEFINE(DIRECT_THREADED)) -AC_ARG_ENABLE(indirect-threaded, -[ --enable-indirect-threaded Force indirect threading. This can cause a - slowdown on some machines. - (default processor-dependent)], -AC_DEFINE(INDIRECT_THREADED)) +AC_DEFINE(FORCE_REG,,[Define if you want to use explicit register declarations for better performance or for more convenient CODE words (does not work with all GCC versions on all machines)])) AC_ARG_WITH(debug, [ --with-debug specifies option -g to compile with debug info (default) @@ -61,25 +53,27 @@ AC_ARG_WITH(peephole, but slower images.], PEEPHOLE="$withval") +#currently we force direct threading this way. Eventually we should +#setup in the arch and engine files right + CFLAGS=$CFLAGS AC_PROG_CC -if test "$GCC" = "yes" -then - echo "Fine, gcc is available" -else - cat <<'EOF' -Gforth requires GCC-2.0 or higher (it uses GNU C extensions). -It does not work with other C compilers. Please install the GNU C compiler, -and try again (or search for a binary distribution for your platform). -EOF - exit 1 -fi +test "$GCC" = "yes" || AC_MSG_ERROR(Gforth uses GNU C extensions and requires GCC 2.0 or higher) AC_SUBST(CC) AC_SUBST(DEBUGFLAG) +AC_MSG_CHECKING(gcc version) +gcc_version=`$CC -v 2>&1|grep 'gcc version'|sed 's/.*gcc version //'` +AC_MSG_RESULT($gcc_version) +if expr "$gcc_version" \> 3.0.4 >/dev/null && expr "$gcc_version" \< 3.2.1 >/dev/null +then + no_dynamic_default=1 + AC_MSG_WARN(Disabling dynamic native code generation by default (speed penalty factor ~2)) +fi + dnl the following macro produces a warning with autoconf-2.1 AC_CHECK_SIZEOF(char *) case "$ac_cv_sizeof_char_p" in @@ -100,6 +94,7 @@ AC_CHECK_SIZEOF(int) AC_CHECK_SIZEOF(long) AC_CHECK_SIZEOF(long long) +AC_MSG_CHECKING([for a C type for cells]) ac_cv_int_type_cell=none case "$ac_cv_sizeof_char_p" in $ac_cv_sizeof_int) @@ -118,13 +113,10 @@ case "$ac_cv_sizeof_char_p" in ac_cv_int_type_cell="long long" ;; esac -if test "$ac_cv_int_type_cell" != int; then - echo "So, sizeof(pointer)!=sizeof(int); looks like a DOS C compiler to me." - echo "Since you don't have a proper C on this machine, that's one more reason" - echo "to use Forth;-)" -fi -AC_DEFINE_UNQUOTED(CELL_TYPE,$ac_cv_int_type_cell) +AC_MSG_RESULT($ac_cv_int_type_cell) +AC_DEFINE_UNQUOTED(CELL_TYPE,$ac_cv_int_type_cell,[an integer type that is as long as a pointer]) +AC_MSG_CHECKING([for a C type for double-cells]) ac_cv_int_type_double_cell=none case `expr 2 '*' "$ac_cv_sizeof_char_p"` in $ac_cv_sizeof_short) @@ -140,15 +132,13 @@ case `expr 2 '*' "$ac_cv_sizeof_char_p"` ac_cv_int_type_double_cell="long long" ;; esac +AC_MSG_RESULT($ac_cv_int_type_double_cell) if test "$ac_cv_int_type_double_cell" = none; then - echo "Emulating double-cell arithmetic. This may be slow." - echo "If you find this unacceptable, ask the GCC maintainers to provide proper" - echo 'long longs for your machine (the GCC manual states that they \"are twice as' - echo "long as \`long int\'\")." - LIBOBJS="$LIBOBJS dblsub.o" - AC_DEFINE(BUGGY_LONG_LONG) + AC_MSG_WARN([Emulating double-cell arithmetic. This may be slow.]) + AC_LIBOBJ(dblsub) + AC_DEFINE(BUGGY_LONG_LONG,,[define this if there is no working DOUBLE_CELL_TYPE on your machine]) else - AC_DEFINE_UNQUOTED(DOUBLE_CELL_TYPE,$ac_cv_int_type_double_cell) + AC_DEFINE_UNQUOTED(DOUBLE_CELL_TYPE,$ac_cv_int_type_double_cell,[an integer type that is twice as long as a pointer]) fi AC_MSG_CHECKING([whether the linker accepts -export-dynamic]) @@ -167,13 +157,9 @@ case "$host_cpu" in hppa*) machine=hppa $srcdir/mkinstalldirs arch/hppa - LIBOBJS="$LIBOBJS ../arch/hppa/cache.o" + AC_LIBOBJ(../arch/hppa/cache) LDFLAGS="$LDFLAGS -Xlinker -N" LIBS="$LIBS -L/lib/pa1.1/" - if test "${enable_direct_threaded+set}" = "" - then - AC_DEFINE(DIRECT_THREADED) - fi ;; sparc*) machine=sparc @@ -181,35 +167,17 @@ case "$host_cpu" in i386) machine=386 CFLAGS="$CFLAGS -fomit-frame-pointer -fforce-addr -fforce-mem" - if test "${enable_direct_threaded+set}" = "" \ - -a "${enable_indirect_threaded+set}" = "" - then - echo "Using direct threaded code on 386" - AC_DEFINE(DIRECT_THREADED) - fi ;; i486) machine=386 CFLAGS="$CFLAGS -fomit-frame-pointer -fforce-addr -fforce-mem -m486" - if test "${enable_direct_threaded+set}" = "" \ - -a "${enable_indirect_threaded+set}" = "" - then - echo "Using direct threaded code on 486" - AC_DEFINE(DIRECT_THREADED) - fi ;; i*86) machine=386 CFLAGS="$CFLAGS -fomit-frame-pointer -fforce-addr -fforce-mem" CFLAGS_1="$CFLAGS" - CFLAGS="$CFLAGS -mpentium" + CFLAGS="$CFLAGS -march=pentium" AC_TRY_COMPILE(,,,CFLAGS="$CFLAGS_1 -m486") - if test "${enable_direct_threaded+set}" = "" \ - -a "${enable_indirect_threaded+set}" = "" - then - echo "Using indirect threaded code on IA32 CPUs with split L1 caches" - AC_DEFINE(INDIRECT_THREADED) - fi ;; ia64*) machine=ia64 @@ -219,11 +187,26 @@ case "$host_cpu" in CFLAGS="$CFLAGS -fomit-frame-pointer" if test "$host_os" = "nextstep3" then - LIBOBJS="$LIBOBJS termios.o" + AC_LIBOBJ(termios) fi ;; mips*) machine=mips + #dynamic native code has the following problems on MIPS: + # + #1) J/JAL seems relocatable, but is are only + #relocatable within a 256MB-segment. While we try to + #get the linker to arrange this, there is no guarantee + #that this will succeed (and if the user uses a lot of + #memory, it is likely to fail). + # + #2) The way we generate dynamic native code may + #violate MIPS architectural restrictions (in + #particular, the delay slots of LW, MFLO, etc.) + # + #Therefore we disable dynamic native code by default: + no_dynamic_default=1 + AC_MSG_WARN(Disabling dynamic native code generation by default (speed penalty factor ~2)) #link text and data segment into the same 256M region! AC_MSG_CHECKING([whether the linker accepts -T]) OLDLDFLAGS=$LDFLAGS @@ -231,7 +214,6 @@ case "$host_cpu" in AC_TRY_LINK(,,ac_link_mips_t=yes,ac_link_mips_t=no) test $ac_link_mips_t = yes||LDFLAGS=$OLDLDFLAGS AC_MSG_RESULT($ac_link_mips_t) - test $ac_link_mips_t = yes||(echo cannot link text and data into same 256M region, using indirect threading; AC_DEFINE(INDIRECT_THREADED)) AC_MSG_CHECKING([whether the linker accepts -D]) OLDLDFLAGS=$LDFLAGS LDFLAGS="$LDFLAGS -Xlinker -D -Xlinker 10400000" @@ -247,31 +229,23 @@ case "$host_cpu" in power*|rs6000) machine=power $srcdir/mkinstalldirs arch/power - AC_CHECK_FUNC(_sync_cache_range,true,LIBOBJS="$LIBOBJS ../arch/power/_sync_cache_range.o") - #link text segment into first 32MB - AC_MSG_CHECKING([whether the linker accepts --script=arch/power/elf32ppc.x]) - OLDLDFLAGS=$LDFLAGS - #the -L../$srcdir helps when $srcdir is relative - LDFLAGS="$LDFLAGS -L$srcdir -L../$srcdir -Xlinker --script=$srcdir/arch/power/elf32ppc.x" - AC_TRY_LINK(,,ac_link_script=yes,ac_link_script=no) - test $ac_link_script = yes||LDFLAGS=$OLDLDFLAGS - AC_MSG_RESULT($ac_link_script) - AC_MSG_CHECKING([whether the code is in the first 32MB]) - AC_TRY_RUN([main(){label: exit(((unsigned long)&&label)>32000000UL);}],ac_code_under_32=yes,ac_code_under_32=no,ac_code_under_32=no) - AC_MSG_RESULT($ac_code_under_32) - test $ac_code_under_32 = yes||(AC_MSG_WARN([Using indirect threading]); AC_DEFINE(INDIRECT_THREADED)) + AC_CHECK_FUNC(_sync_cache_range,true,AC_LIBOBJ(../arch/power/_sync_cache_range)) ;; *) - echo "No direct threading support for $host_cpu, using indirect threading." - echo "Using a generic machine description." - echo "I'll assume that C floats and doubles are represented by IEEE single and" - echo "double numbers. If this is not so, SF@ etc. will not work correctly." - echo "FLUSH-ICACHE will do nothing, so END-CODE may not work properly!" + AC_MSG_WARN([Using a generic machine description]) + AC_MSG_WARN([Assuming C floats and doubles are IEEE floats and doubles (for SF@ DF@ SF! DF!)]) + AC_MSG_WARN([FLUSH-ICACHE will do nothing, so END-CODE may not work properly!]) machine=generic esac AC_SUBST(host) AC_SUBST(ENGINE_FLAGS) +# Try if GCC understands -fno-cross-jump + +CFLAGS_1="$CFLAGS" +CFLAGS="$CFLAGS -fno-cross-jump" +AC_TRY_COMPILE(,,,CFLAGS="$CFLAGS_1") + AC_CHECK_PROG(asm_fs,asm.fs,arch/$machine/asm.fs,,$srcdir/arch/$machine) AC_SUBST(asm_fs) @@ -281,31 +255,37 @@ AC_SUBST(disasm_fs) case "$host_os" in *win32) EXE=".exe" + DIRSEP="\\" ;; *) EXE="" + DIRSEP="/" ;; esac AC_SUBST(EXE) +AC_SUBST(DIRSEP) +AC_DEFINE_UNQUOTED(DIRSEP,'$DIRSEP',[a directory separator character]) dnl Now a little support for DOS/DJGCC AC_SUBST(GFORTH_EXE) GFORTH_EXE="" AC_SUBST(GFORTHFAST_EXE) GFORTHFAST_EXE="" +AC_SUBST(GFORTHITC_EXE) +GFORTHITC_EXE="" AC_SUBST(GFORTHDITC_EXE) GFORTHDITC_EXE="" PATHSEP=":" AC_SUBST(PATHSEP) -AC_DEFINE_UNQUOTED(PATHSEP,'$PATHSEP') +AC_DEFINE_UNQUOTED(PATHSEP,'$PATHSEP',[a path separator character]) AC_SUBST(FORTHSIZES) if test "$PEEPHOLE" = "yes" then PEEPHOLEFLAG="true" - AC_DEFINE(HAS_PEEPHOLE) + AC_DEFINE(HAS_PEEPHOLE,,[Define if you want to use peephole optimization]) else PEEPHOLEFLAG="false" fi @@ -334,6 +314,41 @@ else KERNEL="kernl16l.fi kernl16b.fi kernl32l.fi kernl32b.fi kernl64l.fi kernl64b.fi" fi +#check how to do asm(".skip 16") +AC_MSG_CHECKING([if and how we can waste code space]) +skipcode=no +for i in ".skip 16" ".block 16" ".org .+16" ".=.+16" ".space 16" +do + AC_TRY_RUN( +int foo(int); +main() +{ + exit(foo(0)!=16); +} +int foo(int x) +{ + if (x) { + label1: + asm("$i"); + label2: + } + return (&&label2)-(&&label1); +} + ,skipcode=$i; break + ,,) +done +AC_MSG_RESULT($skipcode) +if test "$skipcode" = no +then + no_dynamic_default=1 + AC_DEFINE_UNQUOTED(SKIP16,((void)0),statement for skipping 16 bytes) + AC_MSG_WARN(Disabling dynamic native code generation by default (speed penalty factor ~2)) +else + AC_DEFINE_UNQUOTED(SKIP16,asm("$skipcode"),statement for skipping 16 bytes) +fi + +AC_DEFINE_UNQUOTED(NO_DYNAMIC_DEFAULT,$no_dynamic_default,default value for no_dynamic) + dnl Checks for programs. AC_PROG_LN_S dnl AM_PROG_INSTALL #performed by AM_INIT_AUTOMAKE @@ -348,16 +363,17 @@ then AC_FUNC_MEMCMP fi AC_REPLACE_FUNCS(memmove strtoul pow10 strerror strsignal atanh) -AC_CHECK_FUNCS(dlopen sys_siglist getrusage) +AC_CHECK_FUNCS(dlopen sys_siglist getrusage fseeko ftello) +AC_TYPE_OFF_T AC_DECL_SYS_SIGLIST -AC_CHECK_FUNC(getopt_long,true,LIBOBJS="$LIBOBJS getopt.o getopt1.o") -AC_CHECK_FUNCS(rint expm1 log1p) -AC_REPLACE_FUNCS(ecvt) +AC_CHECK_FUNC(getopt_long,true,AC_LIBOBJ(getopt); AC_LIBOBJ(getopt1)) +AC_CHECK_FUNCS(expm1 log1p) +AC_REPLACE_FUNCS(rint ecvt) dnl No check for select, because our replacement is no good under dnl anything but DOS AC_CHECK_HEADERS(sys/mman.h fnmatch.h) AC_FUNC_FNMATCH -test $ac_cv_func_fnmatch_works = yes || LIBOBJS="$LIBOBJS fnmatch.o" +test $ac_cv_func_fnmatch_works = yes || AC_LIBOBJ(fnmatch) AC_CHECK_FUNCS(mmap sysconf getpagesize) AM_PATH_LISPDIR