From b1012ca4be23e00404c49f8520196af908110a10 Mon Sep 17 00:00:00 2001 From: Francois-Xavier Coudert Date: Thu, 9 Sep 2010 18:47:11 +0000 Subject: acinclude.m4 (LIBGFOR_CHECK_FOR_BROKEN_ISFINITE, [...]): Remove. * acinclude.m4 (LIBGFOR_CHECK_FOR_BROKEN_ISFINITE, LIBGFOR_CHECK_FOR_BROKEN_ISNAN, LIBGFOR_CHECK_FOR_BROKEN_FPCLASSIFY): Remove. * configure.ac: Remove above checks. * libgfortran.h: Define isnan, isinf, isfinite, isnormal and signbit in terms of the respective built-ins. * io/write_float.def (WRITE_FLOAT): Use signbit() instead of __builtin_signbit(). * intrinsics/c99_functions.c (tgamma): Use isnan() instead of __builtin_isnan(). * config.h.in: Regenerate. * configure: Regenerate. From-SVN: r164119 --- libgfortran/intrinsics/c99_functions.c | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'libgfortran/intrinsics/c99_functions.c') diff --git a/libgfortran/intrinsics/c99_functions.c b/libgfortran/intrinsics/c99_functions.c index 03bcbfe..20fc7e0 100644 --- a/libgfortran/intrinsics/c99_functions.c +++ b/libgfortran/intrinsics/c99_functions.c @@ -558,7 +558,6 @@ powf (float x, float y) } #endif -/* Note that if fpclassify is not defined, then NaN is not handled */ /* Algorithm by Steven G. Kargl. */ @@ -1854,7 +1853,7 @@ tgamma (double x) n = 0; y = x; - if (__builtin_isnan (x)) + if (isnan (x)) return x; if (y <= 0) -- cgit v1.1