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).
 100 AC_DEFUN([gl_FUNC_FREXPL_WORKS],
 101 [
 102   AC_REQUIRE([AC_PROG_CC])
 103   AC_REQUIRE([AC_CANONICAL_HOST]) dnl for cross-compiles
 104   AC_CACHE_CHECK([whether frexpl works], [gl_cv_func_frexpl_works],
 105     [
 106       AC_TRY_RUN([
 107 #include <math.h>
 108 extern long double frexpl (long double, int *);
 109 int main()
 110 {
 111   volatile long double x;
 112   /* Test on finite numbers.  */
 113   x = 16.0L;
 114   {
 115     int exp = -9999;
 116     frexpl (x, &exp);
 117     if (exp != 5)
 118       return 1;
 119   }
 120   /* Test on large finite numbers.  This fails on BeOS at i = 16322, while
 121      LDBL_MAX_EXP = 16384.
 122      In the loop end test, we test x against Infinity, rather than comparing
 123      i with LDBL_MAX_EXP, because BeOS <float.h> has a wrong LDBL_MAX_EXP.  */
 124   {
 125     int i;
 126     for (i = 1, x = 1.0L; x != x + x; i++, x *= 2.0L)
 127       {
 128         int exp = -9999;
 129         frexpl (x, &exp);
 130         if (exp != i)
 131           return 1;
 132       }
 133   }
 134   /* Test on infinite numbers.  */
 135   x = 1.0L / 0.0L;
 136   {
 137     int exp;
 138     long double y = frexpl (x, &exp);
 139     if (y != x)
 140       return 1;
 141   }
 142   return 0;
 143 }], [gl_cv_func_frexpl_works=yes], [gl_cv_func_frexpl_works=no],
 144       [case "$host_os" in
 145          aix* | beos* | irix* | mingw*) gl_cv_func_frexpl_works="guessing no";;
 146          *)                    gl_cv_func_frexpl_works="guessing yes";;
 147        esac
 148       ])
 149     ])
 150 ])