f917de584a0dc262ccb595754a2dceb307013a16
[pspp] / m4 / truncf.m4
1 # truncf.m4 serial 4
2 dnl Copyright (C) 2007, 2010-2011 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_TRUNCF],
8 [
9   m4_divert_text([DEFAULTS], [gl_truncf_required=plain])
10   AC_REQUIRE([gl_MATH_H_DEFAULTS])
11   dnl Persuade glibc <math.h> to declare truncf().
12   AC_REQUIRE([gl_USE_SYSTEM_EXTENSIONS])
13   dnl Test whether truncf() is declared.
14   AC_CHECK_DECLS([truncf], , , [#include <math.h>])
15   if test "$ac_cv_have_decl_truncf" = yes; then
16     dnl Test whether truncf() can be used without libm.
17     TRUNCF_LIBM=?
18     AC_LINK_IFELSE(
19       [AC_LANG_PROGRAM(
20          [[#ifndef __NO_MATH_INLINES
21            # define __NO_MATH_INLINES 1 /* for glibc */
22            #endif
23            #include <math.h>
24            float x;]],
25          [[x = truncf(x);]])],
26       [TRUNCF_LIBM=])
27     if test "$TRUNCF_LIBM" = "?"; then
28       save_LIBS="$LIBS"
29       LIBS="$LIBS -lm"
30       AC_LINK_IFELSE(
31         [AC_LANG_PROGRAM(
32            [[#ifndef __NO_MATH_INLINES
33              # define __NO_MATH_INLINES 1 /* for glibc */
34              #endif
35              #include <math.h>
36              float x;]],
37            [[x = truncf(x);]])],
38         [TRUNCF_LIBM="-lm"])
39       LIBS="$save_LIBS"
40     fi
41     if test "$TRUNCF_LIBM" = "?"; then
42       TRUNCF_LIBM=
43     fi
44     m4_ifdef([gl_FUNC_TRUNCF_IEEE], [
45       if test $gl_truncf_required = ieee && test $REPLACE_TRUNCF = 0; then
46         AC_CACHE_CHECK([whether truncf works according to ISO C 99 with IEC 60559],
47           [gl_cv_func_truncf_ieee],
48           [
49             save_LIBS="$LIBS"
50             LIBS="$LIBS $TRUNCF_LIBM"
51             AC_RUN_IFELSE(
52               [AC_LANG_SOURCE([[
53 #ifndef __NO_MATH_INLINES
54 # define __NO_MATH_INLINES 1 /* for glibc */
55 #endif
56 #include <math.h>
57 ]gl_FLOAT_MINUS_ZERO_CODE[
58 ]gl_FLOAT_SIGNBIT_CODE[
59 int main()
60 {
61   /* Test whether truncf (-0.0f) is -0.0f.  */
62   if (signbitf (minus_zerof) && !signbitf (truncf (minus_zerof)))
63     return 1;
64   return 0;
65 }
66               ]])],
67               [gl_cv_func_truncf_ieee=yes],
68               [gl_cv_func_truncf_ieee=no],
69               [gl_cv_func_truncf_ieee="guessing no"])
70             LIBS="$save_LIBS"
71           ])
72         case "$gl_cv_func_truncf_ieee" in
73           *yes) ;;
74           *) REPLACE_TRUNCF=1 ;;
75         esac
76       fi
77     ])
78   else
79     HAVE_DECL_TRUNCF=0
80   fi
81   if test $HAVE_DECL_TRUNCF = 0 || test $REPLACE_TRUNCF = 1; then
82     AC_LIBOBJ([truncf])
83     TRUNCF_LIBM=
84   fi
85   AC_SUBST([TRUNCF_LIBM])
86 ])