2004-05-13 06:41:07 +00:00
|
|
|
dnl Check:
|
|
|
|
dnl * If we have gettimeofday;
|
|
|
|
dnl * If we have struct timezone for use in calling it;
|
|
|
|
dnl * If calling it with a timezone pointer actually works -- this is deemed
|
|
|
|
dnl obsolete or undefined on some systems which say you should use a null
|
|
|
|
dnl pointer -- and undefine HAVE_TIMEZONE if so;
|
|
|
|
dnl * Whether it only takes one arg.
|
|
|
|
AC_DEFUN([LIBGFOR_GETTIMEOFDAY], [
|
|
|
|
AC_CHECK_FUNCS(gettimeofday)
|
|
|
|
if test "$ac_cv_func_gettimeofday" = yes; then
|
|
|
|
AC_CACHE_CHECK([for struct timezone], gfor_cv_struct_timezone,
|
|
|
|
[AC_TRY_COMPILE([#include <sys/time.h>],
|
|
|
|
[struct timezone tz;],
|
|
|
|
gfor_cv_struct_timezone=yes, gfor_cv_struct_timezone=no)])
|
|
|
|
if test $gfor_cv_struct_timezone = yes; then
|
|
|
|
dnl It may be that we can't call gettimeofday with a non-null pointer.
|
|
|
|
dnl In that case we'll lie about struct timezone.
|
|
|
|
AC_TRY_RUN([
|
|
|
|
#ifdef TIME_WITH_SYS_TIME
|
|
|
|
#include <sys/time.h>
|
|
|
|
#include <time.h>
|
|
|
|
#else
|
|
|
|
#ifdef HAVE_SYS_TIME_H
|
|
|
|
#include <sys/time.h>
|
|
|
|
#else
|
|
|
|
#include <time.h>
|
|
|
|
#endif
|
|
|
|
#endif
|
|
|
|
main ()
|
|
|
|
{
|
|
|
|
struct timeval time;
|
|
|
|
struct timezone dummy;
|
|
|
|
if (gettimeofday (&time, &dummy))
|
|
|
|
exit (1);
|
|
|
|
else
|
|
|
|
exit (0);
|
|
|
|
}],
|
|
|
|
[gfor_have_struct_timezone=yes], [gfor_have_struct_timezone=no],
|
|
|
|
[gfor_have_struct_timezone=yes])
|
|
|
|
if test $gfor_have_struct_timezone = yes; then
|
|
|
|
AC_DEFINE(HAVE_TIMEZONE, 1, [Do we have struct timezone])
|
|
|
|
fi
|
|
|
|
fi
|
|
|
|
AC_REQUIRE([AC_HEADER_TIME])
|
2004-11-05 03:49:25 +00:00
|
|
|
AC_CACHE_CHECK([whether gettimeofday can accept two arguments],
|
2004-05-13 06:41:07 +00:00
|
|
|
emacs_cv_gettimeofday_two_arguments,
|
2004-11-05 03:49:25 +00:00
|
|
|
[AC_TRY_LINK([
|
2004-05-13 06:41:07 +00:00
|
|
|
#ifdef TIME_WITH_SYS_TIME
|
|
|
|
#include <sys/time.h>
|
|
|
|
#include <time.h>
|
|
|
|
#else
|
|
|
|
#ifdef HAVE_SYS_TIME_H
|
|
|
|
#include <sys/time.h>
|
|
|
|
#else
|
|
|
|
#include <time.h>
|
|
|
|
#endif
|
|
|
|
#endif
|
|
|
|
],
|
|
|
|
[
|
|
|
|
struct timeval time;
|
|
|
|
#ifdef HAVE_TIMEZONE
|
|
|
|
struct timezone dummy;
|
|
|
|
#define DUMMY &dummy
|
|
|
|
#else
|
|
|
|
#define DUMMY NULL
|
|
|
|
#endif
|
|
|
|
gettimeofday (&time, DUMMY);],
|
|
|
|
emacs_cv_gettimeofday_two_arguments=yes,
|
2004-11-05 03:49:25 +00:00
|
|
|
emacs_cv_gettimeofday_two_arguments=no)])
|
2004-05-13 06:41:07 +00:00
|
|
|
if test $emacs_cv_gettimeofday_two_arguments = no; then
|
|
|
|
AC_DEFINE(GETTIMEOFDAY_ONE_ARGUMENT, 1,
|
|
|
|
[Does gettimeofday take a single argument])
|
|
|
|
fi
|
|
|
|
fi])
|
|
|
|
|
|
|
|
sinclude(../libtool.m4)
|
|
|
|
dnl The lines below arrange for aclocal not to bring an installed
|
|
|
|
dnl libtool.m4 into aclocal.m4, while still arranging for automake to
|
|
|
|
dnl add a definition of LIBTOOL to Makefile.in.
|
|
|
|
ifelse(,,,[AC_SUBST(LIBTOOL)
|
|
|
|
AC_DEFUN([AM_PROG_LIBTOOL])
|
|
|
|
AC_DEFUN([AC_LIBTOOL_DLOPEN])
|
|
|
|
AC_DEFUN([AC_PROG_LD])
|
|
|
|
])
|
|
|
|
|
2004-11-20 13:15:17 +00:00
|
|
|
dnl Check whether the target is ILP32.
|
|
|
|
AC_DEFUN([LIBGFOR_TARGET_ILP32], [
|
|
|
|
AC_CACHE_CHECK([whether the target is ILP32], target_ilp32, [
|
|
|
|
save_CFLAGS="$CFLAGS"
|
|
|
|
CFLAGS="-O2"
|
|
|
|
AC_TRY_LINK(,[
|
|
|
|
if (sizeof(int) == 4 && sizeof(long) == 4 && sizeof(void *) == 4)
|
|
|
|
;
|
|
|
|
else
|
|
|
|
undefined_function ();
|
|
|
|
],
|
|
|
|
target_ilp32=yes,
|
|
|
|
target_ilp32=no)
|
|
|
|
CFLAGS="$save_CFLAGS"])
|
|
|
|
if test $target_ilp32 = yes; then
|
|
|
|
AC_DEFINE(TARGET_ILP32, 1,
|
|
|
|
[Define to 1 if the target is ILP32.])
|
|
|
|
fi
|
|
|
|
])
|
acinclude.m4 (LIBGFOR_CHECK_ATTRIBUTE_VISIBILITY): New.
* acinclude.m4 (LIBGFOR_CHECK_ATTRIBUTE_VISIBILITY): New.
(LIBGFOR_CHECK_ATTRIBUTE_DLLEXPORT): New.
(LIBGFOR_CHECK_ATTRIBUTE_ALIAS): New.
* configure.ac: Use them.
* configure, config.h.in, aclocal.m4: Rebuild.
* libgfortran.h (prefix): Remove.
(PREFIX, IPREFIX): New.
(sym_rename, sym_rename1, sym_rename2): New.
(internal_proto, export_proto, export_proto_np): New.
(iexport_proto, iexport): New.
(iexport_data_proto, iexport_data): New.
* intrinsics/abort.c, intrinsics/args.c, intrinsics/associated.c,
intrinsics/cpu_time.c, intrinsics/cshift0.c,
intrinsics/date_and_time.c, intrinsics/env.c, intrinsics/eoshift0.c,
intrinsics/eoshift2.c, intrinsics/etime.c, intrinsics/exit.c,
intrinsics/flush.c, intrinsics/fnum.c, intrinsics/getXid.c,
intrinsics/getcwd.c, intrinsics/ishftc.c, intrinsics/mvbits.c,
intrinsics/pack_generic.c, intrinsics/rand.c, intrinsics/random.c,
intrinsics/reshape_generic.c, intrinsics/size.c,
intrinsics/spread_generic.c, intrinsics/stat.c,
intrinsics/string_intrinsics.c, intrinsics/system.c,
intrinsics/system_clock.c, intrinsics/transpose_generic.c,
intrinsics/umask.c, intrinsics/unlink.c, intrinsics/unpack_generic.c,
io/backspace.c, io/close.c, io/endfile.c, io/inquire.c, io/io.h,
io/open.c, io/rewind.c, io/transfer.c, libgfortran.h, m4/cshift1.m4,
m4/dotprod.m4, m4/dotprodc.m4, m4/dotprodl.m4, m4/eoshift1.m4,
m4/eoshift3.m4, m4/exponent.m4, m4/fraction.m4, m4/iforeach.m4,
m4/ifunction.m4, m4/matmul.m4, m4/matmull.m4, m4/nearest.m4,
m4/pow.m4, m4/reshape.m4, m4/set_exponent.m4, m4/shape.m4,
m4/transpose.m4, runtime/environ.c, runtime/error.c,
runtime/in_pack_generic.c, runtime/in_unpack_generic.c,
runtime/main.c, runtime/memory.c, runtime/pause.c, runtime/select.c,
runtime/stop.c: Use them to mark symbols internal or external.
* generated/*: Rebuild.
From-SVN: r92045
2004-12-12 08:59:05 +00:00
|
|
|
|
|
|
|
dnl Check whether the target supports hidden visibility.
|
|
|
|
AC_DEFUN([LIBGFOR_CHECK_ATTRIBUTE_VISIBILITY], [
|
|
|
|
AC_CACHE_CHECK([whether the target supports hidden visibility],
|
|
|
|
have_attribute_visibility, [
|
|
|
|
save_CFLAGS="$CFLAGS"
|
|
|
|
CFLAGS="$CFLAGS -Werror"
|
|
|
|
AC_TRY_COMPILE([void __attribute__((visibility("hidden"))) foo(void) { }],
|
|
|
|
[], have_attribute_visibility=yes,
|
|
|
|
have_attribute_visibility=no)
|
|
|
|
CFLAGS="$save_CFLAGS"])
|
|
|
|
if test $have_attribute_visibility = yes; then
|
|
|
|
AC_DEFINE(HAVE_ATTRIBUTE_VISIBILITY, 1,
|
|
|
|
[Define to 1 if the target supports __attribute__((visibility(...))).])
|
|
|
|
fi])
|
|
|
|
|
|
|
|
dnl Check whether the target supports dllexport
|
|
|
|
AC_DEFUN([LIBGFOR_CHECK_ATTRIBUTE_DLLEXPORT], [
|
|
|
|
AC_CACHE_CHECK([whether the target supports dllexport],
|
|
|
|
have_attribute_dllexport, [
|
|
|
|
save_CFLAGS="$CFLAGS"
|
|
|
|
CFLAGS="$CFLAGS -Werror"
|
|
|
|
AC_TRY_COMPILE([void __attribute__((dllexport)) foo(void) { }],
|
|
|
|
[], have_attribute_dllexport=yes,
|
|
|
|
have_attribute_dllexport=no)
|
|
|
|
CFLAGS="$save_CFLAGS"])
|
|
|
|
if test $have_attribute_dllexport = yes; then
|
|
|
|
AC_DEFINE(HAVE_ATTRIBUTE_DLLEXPORT, 1,
|
|
|
|
[Define to 1 if the target supports __attribute__((dllexport)).])
|
|
|
|
fi])
|
|
|
|
|
|
|
|
dnl Check whether the target supports symbol aliases.
|
|
|
|
AC_DEFUN([LIBGFOR_CHECK_ATTRIBUTE_ALIAS], [
|
|
|
|
AC_CACHE_CHECK([whether the target supports symbol aliases],
|
|
|
|
have_attribute_alias, [
|
|
|
|
AC_TRY_LINK([
|
|
|
|
#define ULP STR1(__USER_LABEL_PREFIX__)
|
|
|
|
#define STR1(x) STR2(x)
|
|
|
|
#define STR2(x) #x
|
|
|
|
void foo(void) { }
|
|
|
|
extern void bar(void) __attribute__((alias(ULP "foo")));],
|
|
|
|
[bar();], have_attribute_alias=yes, have_attribute_alias=no)])
|
|
|
|
if test $have_attribute_alias = yes; then
|
|
|
|
AC_DEFINE(HAVE_ATTRIBUTE_ALIAS, 1,
|
|
|
|
[Define to 1 if the target supports __attribute__((alias(...))).])
|
|
|
|
fi])
|
2005-08-27 16:01:54 +00:00
|
|
|
|
|
|
|
dnl Check whether target can unlink a file still open.
|
|
|
|
AC_DEFUN([LIBGFOR_CHECK_UNLINK_OPEN_FILE], [
|
|
|
|
AC_CACHE_CHECK([whether the target can unlink an open file],
|
|
|
|
have_unlink_open_file, [
|
|
|
|
AC_TRY_RUN([
|
|
|
|
#include <errno.h>
|
|
|
|
#include <fcntl.h>
|
|
|
|
#include <unistd.h>
|
|
|
|
#include <sys/stat.h>
|
|
|
|
|
|
|
|
int main ()
|
|
|
|
{
|
|
|
|
int fd;
|
|
|
|
|
|
|
|
fd = open ("testfile", O_RDWR | O_CREAT, S_IWRITE | S_IREAD);
|
|
|
|
if (fd <= 0)
|
|
|
|
return 0;
|
|
|
|
if (unlink ("testfile") == -1)
|
|
|
|
return 1;
|
|
|
|
write (fd, "This is a test\n", 15);
|
|
|
|
close (fd);
|
|
|
|
|
|
|
|
if (open ("testfile", O_RDONLY, S_IWRITE | S_IREAD) == -1 && errno == ENOENT)
|
|
|
|
return 0;
|
|
|
|
else
|
|
|
|
return 1;
|
|
|
|
}], have_unlink_open_file=yes, have_unlink_open_file=no, [
|
|
|
|
case "${target}" in
|
|
|
|
*mingw*) have_unlink_open_file=no ;;
|
|
|
|
*) have_unlink_open_file=yes;;
|
|
|
|
esac])])
|
|
|
|
if test x"$have_unlink_open_file" = xyes; then
|
|
|
|
AC_DEFINE(HAVE_UNLINK_OPEN_FILE, 1, [Define if target can unlink open files.])
|
|
|
|
fi])
|