X-Git-Url: http://git.hcoop.net/bpt/guile.git/blobdiff_plain/0e6d926db8fc8d72f38f5f1887589e75942311fb..e845cb8486b4fba59f9bb8b051f3a5e1dd76fcb9:/configure.in

diff --git a/configure.in b/configure.in
index f99b6ce97..00d8dae3b 100644
--- a/configure.in
+++ b/configure.in
@@ -1,5 +1,25 @@
 dnl   configuration script for Guile
 dnl   Process this file with autoconf to produce configure.
+dnl
+dnl  Copyright (C) 1998 Free Software Foundation, Inc.
+dnl
+dnl  This file is part of GUILE
+dnl
+dnl  GUILE is free software; you can redistribute it and/or modify it
+dnl  under the terms of the GNU General Public License as published by
+dnl  the Free Software Foundation; either version 2, or (at your
+dnl  option) any later version.
+dnl
+dnl  GUILE is distributed in the hope that it will be useful, but
+dnl  WITHOUT ANY WARRANTY; without even the implied warranty of
+dnl  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+dnl  General Public License for more details.
+dnl
+dnl  You should have received a copy of the GNU General Public License
+dnl  along with GUILE; see the file COPYING.  If not, write to the
+dnl  Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+dnl  Boston, MA 02111-1307, USA.
+
 AC_INIT(Makefile.in)
 . $srcdir/GUILE-VERSION
 AM_INIT_AUTOMAKE($PACKAGE, $VERSION, no-define)
@@ -37,6 +57,8 @@ AC_AIX
 AC_ISC_POSIX
 AC_MINIX
 
+AM_PROG_CC_STDC
+
 AC_C_CONST
 AC_C_INLINE
 
@@ -246,10 +268,22 @@ AC_TRY_RUN(aux (l) unsigned long l;
 	   main () { int q; aux((unsigned long)&q); }, 
 	   AC_DEFINE(SCM_STACK_GROWS_UP),,AC_MSG_WARN(Guessing that stack grows down -- see scmconfig.h.in))
 
+AC_CACHE_CHECK([whether floats fit in longs], guile_cv_type_float_fits_long,
+    [AC_TRY_RUN([main () { exit (sizeof(float) > sizeof(long)); }],
+		[guile_cv_type_float_fits_long=yes],
+		[guile_cv_type_float_fits_long=no],
+		[guile_cv_type_float_fits_long=guess-yes])])
+case $guile_cv_type_float_fits_long in
+  "yes" )
+    AC_DEFINE(SCM_SINGLES)
+  ;;
+  "guess-yes" )
+    AC_DEFINE(SCM_SINGLES)
+    AC_MSG_WARN([guessing that sizeof(long) == sizeof(float)])
+    AC_MSG_WARN([see SCM_SINGLES in scmconfig.h.in])
+  ;;
+esac
 
-AC_TRY_RUN(main () { exit (sizeof(float) != sizeof(long)); },
-	   AC_DEFINE(SCM_SINGLES),,AC_DEFINE(SCM_SINGLES)
-	   AC_MSG_WARN(Guessing that sizeof(long) == sizeof(float) -- see scmconfig.h.in))
 
 AC_MSG_CHECKING(for struct linger)
 AC_CACHE_VAL(scm_cv_struct_linger,