libgfortran/acinclude.m4

   1 m4_include(../config/acx.m4)
   2 m4_include(../config/no-executables.m4)
   3
   4 dnl Check that we have a working GNU Fortran compiler
   5 AC_DEFUN([LIBGFOR_WORKING_GFORTRAN], [
   6 AC_MSG_CHECKING([whether the GNU Fortran compiler is working])
   7 AC_LANG_PUSH([Fortran])
   8 AC_COMPILE_IFELSE([[
   9       program foo
  10       real, parameter :: bar = sin (12.34 / 2.5)
  11       end program foo]],
  12     [AC_MSG_RESULT([yes])],
  13     [AC_MSG_RESULT([no])
  14      AC_MSG_ERROR([GNU Fortran is not working; please report a bug in http://gcc.gnu.org/bugzilla, attaching $PWD/config.log])
  15     ])
  16 AC_LANG_POP([Fortran])
  17 ])
  18
  19
  20 sinclude(../libtool.m4)
  21 dnl The lines below arrange for aclocal not to bring an installed
  22 dnl libtool.m4 into aclocal.m4, while still arranging for automake to
  23 dnl add a definition of LIBTOOL to Makefile.in.
  24 ifelse(,,,[AC_SUBST(LIBTOOL)
  25 AC_DEFUN([AM_PROG_LIBTOOL])
  26 AC_DEFUN([AC_LIBTOOL_DLOPEN])
  27 AC_DEFUN([AC_PROG_LD])
  28 ])
  29
  30 dnl Check whether the target supports hidden visibility.
  31 AC_DEFUN([LIBGFOR_CHECK_ATTRIBUTE_VISIBILITY], [
  32   AC_CACHE_CHECK([whether the target supports hidden visibility],
  33                  libgfor_cv_have_attribute_visibility, [
  34   save_CFLAGS="$CFLAGS"
  35   CFLAGS="$CFLAGS -Werror"
  36   AC_TRY_COMPILE([void __attribute__((visibility("hidden"))) foo(void) { }],
  37                  [], libgfor_cv_have_attribute_visibility=yes,
  38                  libgfor_cv_have_attribute_visibility=no)
  39   CFLAGS="$save_CFLAGS"])
  40   if test $libgfor_cv_have_attribute_visibility = yes; then
  41     AC_DEFINE(HAVE_ATTRIBUTE_VISIBILITY, 1,
  42       [Define to 1 if the target supports __attribute__((visibility(...))).])
  43   fi])
  44
  45 dnl Check whether the target supports dllexport
  46 AC_DEFUN([LIBGFOR_CHECK_ATTRIBUTE_DLLEXPORT], [
  47   AC_CACHE_CHECK([whether the target supports dllexport],
  48                  libgfor_cv_have_attribute_dllexport, [
  49   save_CFLAGS="$CFLAGS"
  50   CFLAGS="$CFLAGS -Werror"
  51   AC_TRY_COMPILE([void __attribute__((dllexport)) foo(void) { }],
  52                  [], libgfor_cv_have_attribute_dllexport=yes,
  53                  libgfor_cv_have_attribute_dllexport=no)
  54   CFLAGS="$save_CFLAGS"])
  55   if test $libgfor_cv_have_attribute_dllexport = yes; then
  56     AC_DEFINE(HAVE_ATTRIBUTE_DLLEXPORT, 1,
  57       [Define to 1 if the target supports __attribute__((dllexport)).])
  58   fi])
  59
  60 dnl Check whether the target supports symbol aliases.
  61 AC_DEFUN([LIBGFOR_CHECK_ATTRIBUTE_ALIAS], [
  62   AC_CACHE_CHECK([whether the target supports symbol aliases],
  63                  libgfor_cv_have_attribute_alias, [
  64   AC_TRY_LINK([
  65 void foo(void) { }
  66 extern void bar(void) __attribute__((alias("foo")));],
  67     [bar();], libgfor_cv_have_attribute_alias=yes, libgfor_cv_have_attribute_alias=no)])
  68   if test $libgfor_cv_have_attribute_alias = yes; then
  69     AC_DEFINE(HAVE_ATTRIBUTE_ALIAS, 1,
  70       [Define to 1 if the target supports __attribute__((alias(...))).])
  71   fi])
  72
  73 dnl Check whether the target supports __sync_fetch_and_add.
  74 AC_DEFUN([LIBGFOR_CHECK_SYNC_FETCH_AND_ADD], [
  75   AC_CACHE_CHECK([whether the target supports __sync_fetch_and_add],
  76                  libgfor_cv_have_sync_fetch_and_add, [
  77   AC_TRY_LINK([int foovar = 0;], [
  78 if (foovar <= 0) return __sync_fetch_and_add (&foovar, 1);
  79 if (foovar > 10) return __sync_add_and_fetch (&foovar, -1);],
  80               libgfor_cv_have_sync_fetch_and_add=yes, libgfor_cv_have_sync_fetch_and_add=no)])
  81   if test $libgfor_cv_have_sync_fetch_and_add = yes; then
  82     AC_DEFINE(HAVE_SYNC_FETCH_AND_ADD, 1,
  83               [Define to 1 if the target supports __sync_fetch_and_add])
  84   fi])
  85
  86 dnl Check if threads are supported.
  87 AC_DEFUN([LIBGFOR_CHECK_GTHR_DEFAULT], [
  88   AC_CACHE_CHECK([configured target thread model],
  89                  libgfor_cv_target_thread_file, [
  90 libgfor_cv_target_thread_file=`$CC -v 2>&1 | sed -n 's/^Thread model: //p'`])
  91
  92   if test $libgfor_cv_target_thread_file != single; then
  93     AC_DEFINE(HAVE_GTHR_DEFAULT, 1,
  94               [Define if the compiler has a thread header that is non single.])
  95   fi])
  96
  97 dnl Check for pragma weak.
  98 AC_DEFUN([LIBGFOR_GTHREAD_WEAK], [
  99   AC_CACHE_CHECK([whether pragma weak works],
 100                  libgfor_cv_have_pragma_weak, [
 101   gfor_save_CFLAGS="$CFLAGS"
 102   CFLAGS="$CFLAGS -Wunknown-pragmas"
 103   AC_TRY_COMPILE([void foo (void);
 104 #pragma weak foo], [if (foo) foo ();],
 105                  libgfor_cv_have_pragma_weak=yes, libgfor_cv_have_pragma_weak=no)])
 106   if test $libgfor_cv_have_pragma_weak = yes; then
 107     AC_DEFINE(SUPPORTS_WEAK, 1,
 108               [Define to 1 if the target supports #pragma weak])
 109   fi
 110   case "$host" in
 111     *-*-darwin* | *-*-hpux* | *-*-cygwin* | *-*-mingw* )
 112       AC_DEFINE(GTHREAD_USE_WEAK, 0,
 113                 [Define to 0 if the target shouldn't use #pragma weak])
 114       ;;
 115   esac])
 116
 117 dnl Check whether target can unlink a file still open.
 118 AC_DEFUN([LIBGFOR_CHECK_UNLINK_OPEN_FILE], [
 119   AC_CACHE_CHECK([whether the target can unlink an open file],
 120                   libgfor_cv_have_unlink_open_file, [
 121   AC_TRY_RUN([
 122 #include <errno.h>
 123 #include <fcntl.h>
 124 #include <unistd.h>
 125 #include <sys/stat.h>
 126
 127 int main ()
 128 {
 129   int fd;
 130
 131   fd = open ("testfile", O_RDWR | O_CREAT, S_IWRITE | S_IREAD);
 132   if (fd <= 0)
 133     return 0;
 134   if (unlink ("testfile") == -1)
 135     return 1;
 136   write (fd, "This is a test\n", 15);
 137   close (fd);
 138
 139   if (open ("testfile", O_RDONLY, S_IWRITE | S_IREAD) == -1 && errno == ENOENT)
 140     return 0;
 141   else
 142     return 1;
 143 }], libgfor_cv_have_unlink_open_file=yes, libgfor_cv_have_unlink_open_file=no, [
 144 case "${target}" in
 145   *mingw*) libgfor_cv_have_unlink_open_file=no ;;
 146   *) libgfor_cv_have_unlink_open_file=yes;;
 147 esac])])
 148 if test x"$libgfor_cv_have_unlink_open_file" = xyes; then
 149   AC_DEFINE(HAVE_UNLINK_OPEN_FILE, 1, [Define if target can unlink open files.])
 150 fi])
 151
 152 dnl Check whether CRLF is the line terminator
 153 AC_DEFUN([LIBGFOR_CHECK_CRLF], [
 154   AC_CACHE_CHECK([whether the target has CRLF as line terminator],
 155                   libgfor_cv_have_crlf, [
 156   AC_TRY_RUN([
 157 /* This test program should exit with status 0 if system uses a CRLF as
 158    line terminator, and status 1 otherwise.
 159    Since it is used to check for mingw systems, and should return 0 in any
 160    other case, in case of a failure we will not use CRLF.  */
 161 #include <sys/stat.h>
 162 #include <stdlib.h>
 163 #include <fcntl.h>
 164 #include <stdio.h>
 165
 166 int main ()
 167 {
 168 #ifndef O_BINARY
 169   exit(1);
 170 #else
 171   int fd, bytes;
 172   char buff[5];
 173
 174   fd = open ("foo", O_WRONLY | O_CREAT | O_TRUNC, S_IRWXU);
 175   if (fd < 0)
 176     exit(1);
 177   if (write (fd, "\n", 1) < 0)
 178     perror ("write");
 179
 180   close (fd);
 181
 182   if ((fd = open ("foo", O_RDONLY | O_BINARY, S_IRWXU)) < 0)
 183     exit(1);
 184   bytes = read (fd, buff, 5);
 185   if (bytes == 2 && buff[0] == '\r' && buff[1] == '\n')
 186     exit(0);
 187   else
 188     exit(1);
 189 #endif
 190 }], libgfor_cv_have_crlf=yes, libgfor_cv_have_crlf=no, [
 191 case "${target}" in
 192   *mingw*) libgfor_cv_have_crlf=yes ;;
 193   *) libgfor_cv_have_crlf=no;;
 194 esac])])
 195 if test x"$libgfor_cv_have_crlf" = xyes; then
 196   AC_DEFINE(HAVE_CRLF, 1, [Define if CRLF is line terminator.])
 197 fi])
 198
 199 dnl Check whether isfinite is broken.
 200 dnl The most common problem is that it does not work on long doubles.
 201 AC_DEFUN([LIBGFOR_CHECK_FOR_BROKEN_ISFINITE], [
 202   AC_CACHE_CHECK([whether isfinite is broken],
 203                   libgfor_cv_have_broken_isfinite, [
 204   libgfor_check_for_broken_isfinite_save_LIBS=$LIBS
 205   LIBS="$LIBS -lm"
 206   AC_TRY_RUN([
 207 #include <math.h>
 208 #include <float.h>
 209 int main ()
 210 {
 211 #ifdef isfinite
 212 #ifdef LDBL_MAX
 213   if (!isfinite(LDBL_MAX)) return 1;
 214 #endif
 215 #ifdef DBL_MAX
 216   if (!isfinite(DBL_MAX)) return 1;
 217 #endif
 218 #endif
 219 return 0;
 220 }], libgfor_cv_have_broken_isfinite=no, libgfor_cv_have_broken_isfinite=yes, [
 221 case "${target}" in
 222   hppa*-*-hpux*) libgfor_cv_have_broken_isfinite=yes ;;
 223   *) libgfor_cv_have_broken_isfinite=no ;;
 224 esac])]
 225   LIBS=$libgfor_check_for_broken_isfinite_save_LIBS)
 226 if test x"$libgfor_cv_have_broken_isfinite" = xyes; then
 227   AC_DEFINE(HAVE_BROKEN_ISFINITE, 1, [Define if isfinite is broken.])
 228 fi])
 229
 230 dnl Check whether isnan is broken.
 231 dnl The most common problem is that it does not work on long doubles.
 232 AC_DEFUN([LIBGFOR_CHECK_FOR_BROKEN_ISNAN], [
 233   AC_CACHE_CHECK([whether isnan is broken],
 234                   libgfor_cv_have_broken_isnan, [
 235   libgfor_check_for_broken_isnan_save_LIBS=$LIBS
 236   LIBS="$LIBS -lm"
 237   AC_TRY_RUN([
 238 #include <math.h>
 239 #include <float.h>
 240 int main ()
 241 {
 242 #ifdef isnan
 243 #ifdef LDBL_MAX
 244   {
 245     long double x;
 246     x = __builtin_nanl ("");
 247     if (!isnan(x)) return 1;
 248     if (isnan(LDBL_MAX)) return 1;
 249 #ifdef NAN
 250     x = (long double) NAN;
 251     if (!isnan(x)) return 1;
 252 #endif
 253   }
 254 #endif
 255 #ifdef DBL_MAX
 256   {
 257     double y;
 258     y = __builtin_nan ("");
 259     if (!isnan(y)) return 1;
 260     if (isnan(DBL_MAX)) return 1;
 261 #ifdef NAN
 262     y = (double) NAN;
 263     if (!isnan(y)) return 1;
 264 #endif
 265   }
 266 #endif
 267 #endif
 268 return 0;
 269 }], libgfor_cv_have_broken_isnan=no, libgfor_cv_have_broken_isnan=yes, [
 270 case "${target}" in
 271   hppa*-*-hpux*) libgfor_cv_have_broken_isnan=yes ;;
 272   *) libgfor_cv_have_broken_isnan=no ;;
 273 esac])]
 274   LIBS=$libgfor_check_for_broken_isnan_save_LIBS)
 275 if test x"$libgfor_cv_have_broken_isnan" = xyes; then
 276   AC_DEFINE(HAVE_BROKEN_ISNAN, 1, [Define if isnan is broken.])
 277 fi])
 278
 279 dnl Check whether fpclassify is broken.
 280 dnl The most common problem is that it does not work on long doubles.
 281 AC_DEFUN([LIBGFOR_CHECK_FOR_BROKEN_FPCLASSIFY], [
 282   AC_CACHE_CHECK([whether fpclassify is broken],
 283                   libgfor_cv_have_broken_fpclassify, [
 284   libgfor_check_for_broken_fpclassify_save_LIBS=$LIBS
 285   LIBS="$LIBS -lm"
 286   AC_TRY_RUN([
 287 #include <math.h>
 288 #include <float.h>
 289 int main ()
 290 {
 291 #ifdef fpclassify
 292 #ifdef LDBL_MAX
 293         if (fpclassify(LDBL_MAX) == FP_NAN
 294             || fpclassify(LDBL_MAX) == FP_INFINITE) return 1;
 295 #endif
 296 #ifdef DBL_MAX
 297         if (fpclassify(DBL_MAX) == FP_NAN
 298             || fpclassify(DBL_MAX) == FP_INFINITE) return 1;
 299 #endif
 300 #endif
 301 return 0;
 302 }], libgfor_cv_have_broken_fpclassify=no, libgfor_cv_have_broken_fpclassify=yes, [
 303 case "${target}" in
 304   hppa*-*-hpux*) libgfor_cv_have_broken_fpclassify=yes ;;
 305   *) libgfor_cv_have_broken_fpclassify=no ;;
 306 esac])]
 307   LIBS=$libgfor_check_for_broken_fpclassify_save_LIBS)
 308 if test x"$libgfor_cv_have_broken_fpclassify" = xyes; then
 309   AC_DEFINE(HAVE_BROKEN_FPCLASSIFY, 1, [Define if fpclassify is broken.])
 310 fi])
 311
 312 dnl Check whether the st_ino and st_dev stat fields taken together uniquely
 313 dnl identify the file within the system. This is should be true for POSIX
 314 dnl systems; it is known to be false on mingw32.
 315 AC_DEFUN([LIBGFOR_CHECK_WORKING_STAT], [
 316   AC_CACHE_CHECK([whether the target stat is reliable],
 317                   libgfor_cv_have_working_stat, [
 318   AC_TRY_RUN([
 319 #include <stdio.h>
 320 #include <sys/types.h>
 321 #include <sys/stat.h>
 322 #include <unistd.h>
 323
 324 int main ()
 325 {
 326   FILE *f, *g;
 327   struct stat st1, st2;
 328
 329   f = fopen ("foo", "w");
 330   g = fopen ("bar", "w");
 331   if (stat ("foo", &st1) != 0 || stat ("bar", &st2))
 332     return 1;
 333   if (st1.st_dev == st2.st_dev && st1.st_ino == st2.st_ino)
 334     return 1;
 335   fclose(f);
 336   fclose(g);
 337   return 0;
 338 }], libgfor_cv_have_working_stat=yes, libgfor_cv_have_working_stat=no, [
 339 case "${target}" in
 340   *mingw*) libgfor_cv_have_working_stat=no ;;
 341   *) libgfor_cv_have_working_stat=yes;;
 342 esac])])
 343 if test x"$libgfor_cv_have_working_stat" = xyes; then
 344   AC_DEFINE(HAVE_WORKING_STAT, 1, [Define if target has a reliable stat.])
 345 fi])
 346
 347 dnl Checks for fpsetmask function.
 348 AC_DEFUN([LIBGFOR_CHECK_FPSETMASK], [
 349   AC_CACHE_CHECK([whether fpsetmask is present], libgfor_cv_have_fpsetmask, [
 350     AC_TRY_LINK([
 351 #if HAVE_FLOATINGPOINT_H
 352 # include <floatingpoint.h>
 353 #endif /* HAVE_FLOATINGPOINT_H */
 354 #if HAVE_IEEEFP_H
 355 # include <ieeefp.h>
 356 #endif /* HAVE_IEEEFP_H */],[fpsetmask(0);],
 357     eval "libgfor_cv_have_fpsetmask=yes", eval "libgfor_cv_have_fpsetmask=no")
 358   ])
 359   if test x"$libgfor_cv_have_fpsetmask" = xyes; then
 360     AC_DEFINE(HAVE_FPSETMASK, 1, [Define if you have fpsetmask.])
 361   fi
 362 ])
 363
 364 dnl Check whether we have a mingw that provides a __mingw_snprintf function
 365 AC_DEFUN([LIBGFOR_CHECK_MINGW_SNPRINTF], [
 366   AC_CACHE_CHECK([whether __mingw_snprintf is present], libgfor_cv_have_mingw_snprintf, [
 367     AC_TRY_LINK([
 368 #include <stdio.h>
 369 extern int __mingw_snprintf (char *, size_t, const char *, ...);
 370 ],[
 371 __mingw_snprintf (NULL, 0, "%d\n", 1);
 372 ],
 373     eval "libgfor_cv_have_mingw_snprintf=yes", eval "libgfor_cv_have_mingw_snprintf=no")
 374   ])
 375   if test x"$libgfor_cv_have_mingw_snprintf" = xyes; then
 376     AC_DEFINE(HAVE_MINGW_SNPRINTF, 1, [Define if you have __mingw_snprintf.])
 377   fi
 378 ])