pintos-os.org Git - pspp/blob - m4/frexpl.m4

   1 # frexpl.m4 serial 5
   2 dnl Copyright (C) 2007 Free Software Foundation, Inc.
   3 dnl This file is free software; the Free Software Foundation
   4 dnl gives unlimited permission to copy and/or distribute it,
   5 dnl with or without modifications, as long as this notice is preserved.
   6
   7 AC_DEFUN([gl_FUNC_FREXPL],
   8 [
   9   AC_REQUIRE([gl_MATH_H_DEFAULTS])
  10   FREXPL_LIBM=
  11   AC_CACHE_CHECK([whether frexpl() can be used without linking with libm],
  12     [gl_cv_func_frexpl_no_libm],
  13     [
  14       AC_TRY_LINK([#include <math.h>
  15                    long double x;],
  16                   [int e; return frexpl (x, &e) > 0;],
  17         [gl_cv_func_frexpl_no_libm=yes],
  18         [gl_cv_func_frexpl_no_libm=no])
  19     ])
  20   if test $gl_cv_func_frexpl_no_libm = no; then
  21     AC_CACHE_CHECK([whether frexpl() can be used with libm],
  22       [gl_cv_func_frexpl_in_libm],
  23       [
  24         save_LIBS="$LIBS"
  25         LIBS="$LIBS -lm"
  26         AC_TRY_LINK([#include <math.h>
  27                      long double x;],
  28                     [int e; return frexpl (x, &e) > 0;],
  29           [gl_cv_func_frexpl_in_libm=yes],
  30           [gl_cv_func_frexpl_in_libm=no])
  31         LIBS="$save_LIBS"
  32       ])
  33     if test $gl_cv_func_frexpl_in_libm = yes; then
  34       FREXPL_LIBM=-lm
  35     fi
  36   fi
  37   if test $gl_cv_func_frexpl_no_libm = yes \
  38      || test $gl_cv_func_frexpl_in_libm = yes; then
  39     save_LIBS="$LIBS"
  40     LIBS="$LIBS $FREXPL_LIBM"
  41     gl_FUNC_FREXPL_WORKS
  42     LIBS="$save_LIBS"
  43     case "$gl_cv_func_frexpl_works" in
  44       *yes) gl_func_frexpl=yes ;;
  45       *)    gl_func_frexpl=no; REPLACE_FREXPL=1; FREXPL_LIBM= ;;
  46     esac
  47   else
  48     gl_func_frexpl=no
  49   fi
  50   if test $gl_func_frexpl = yes; then
  51     AC_DEFINE([HAVE_FREXPL], 1,
  52       [Define if the frexpl() function is available.])
  53     dnl Also check whether it's declared.
  54     dnl MacOS X 10.3 has frexpl() in libc but doesn't declare it in <math.h>.
  55     AC_CHECK_DECL([frexpl], , [HAVE_DECL_FREXPL=0], [#include <math.h>])
  56   else
  57     HAVE_DECL_FREXPL=0
  58     AC_LIBOBJ([frexpl])
  59   fi
  60   AC_SUBST([FREXPL_LIBM])
  61 ])
  62
  63 AC_DEFUN([gl_FUNC_FREXPL_NO_LIBM],
  64 [
  65   AC_REQUIRE([gl_MATH_H_DEFAULTS])
  66   AC_CACHE_CHECK([whether frexpl() can be used without linking with libm],
  67     [gl_cv_func_frexpl_no_libm],
  68     [
  69       AC_TRY_LINK([#include <math.h>
  70                    long double x;],
  71                   [int e; return frexpl (x, &e) > 0;],
  72         [gl_cv_func_frexpl_no_libm=yes],
  73         [gl_cv_func_frexpl_no_libm=no])
  74     ])
  75   if test $gl_cv_func_frexpl_no_libm = yes; then
  76     gl_FUNC_FREXPL_WORKS
  77     case "$gl_cv_func_frexpl_works" in
  78       *yes) gl_func_frexpl_no_libm=yes ;;
  79       *)    gl_func_frexpl_no_libm=no; REPLACE_FREXPL=1 ;;
  80     esac
  81   else
  82     gl_func_frexpl_no_libm=no
  83     dnl Set REPLACE_FREXPL here because the system may have frexpl in libm.
  84     REPLACE_FREXPL=1
  85   fi
  86   if test $gl_func_frexpl_no_libm = yes; then
  87     AC_DEFINE([HAVE_FREXPL_IN_LIBC], 1,
  88       [Define if the frexpl() function is available in libc.])
  89     dnl Also check whether it's declared.
  90     dnl MacOS X 10.3 has frexpl() in libc but doesn't declare it in <math.h>.
  91     AC_CHECK_DECL([frexpl], , [HAVE_DECL_FREXPL=0], [#include <math.h>])
  92   else
  93     HAVE_DECL_FREXPL=0
  94     AC_LIBOBJ([frexpl])
  95   fi
  96 ])
  97
  98 dnl Test whether frexpl() works on finite numbers (this fails on AIX 5.1 and
  99 dnl on BeOS) and also on infinite numbers (this fails e.g. on IRIX 6.5 and
 100 dnl mingw).
 101 AC_DEFUN([gl_FUNC_FREXPL_WORKS],
 102 [
 103   AC_REQUIRE([AC_PROG_CC])
 104   AC_REQUIRE([AC_CANONICAL_HOST]) dnl for cross-compiles
 105   AC_CACHE_CHECK([whether frexpl works], [gl_cv_func_frexpl_works],
 106     [
 107       AC_TRY_RUN([
 108 #include <math.h>
 109 extern long double frexpl (long double, int *);
 110 int main()
 111 {
 112   volatile long double x;
 113   /* Test on finite numbers.  */
 114   x = 16.0L;
 115   {
 116     int exp = -9999;
 117     frexpl (x, &exp);
 118     if (exp != 5)
 119       return 1;
 120   }
 121   /* Test on large finite numbers.  This fails on BeOS at i = 16322, while
 122      LDBL_MAX_EXP = 16384.
 123      In the loop end test, we test x against Infinity, rather than comparing
 124      i with LDBL_MAX_EXP, because BeOS <float.h> has a wrong LDBL_MAX_EXP.  */
 125   {
 126     int i;
 127     for (i = 1, x = 1.0L; x != x + x; i++, x *= 2.0L)
 128       {
 129         int exp = -9999;
 130         frexpl (x, &exp);
 131         if (exp != i)
 132           return 1;
 133       }
 134   }
 135   /* Test on infinite numbers.  */
 136   x = 1.0L / 0.0L;
 137   {
 138     int exp;
 139     long double y = frexpl (x, &exp);
 140     if (y != x)
 141       return 1;
 142   }
 143   return 0;
 144 }], [gl_cv_func_frexpl_works=yes], [gl_cv_func_frexpl_works=no],
 145       [case "$host_os" in
 146          aix* | beos* | irix* | mingw* | pw*)
 147             gl_cv_func_frexpl_works="guessing no";;
 148          *) gl_cv_func_frexpl_works="guessing yes";;
 149        esac
 150       ])
 151     ])
 152 ])