X-Git-Url: http://erislabs.net/gitweb/?a=blobdiff_plain;f=lib%2Flogl.c;h=0c00a2b22857aaedc34d8f5a196a859461b9452b;hb=cd56634a4a8179fd5a4419fbb3e27211b042ab1c;hp=42c50cb1ac1a23a3758522c90dfa4ccb41d9b598;hpb=2408f02086a20c0a02241cd4a1cf11f126a95fe3;p=gnulib.git diff --git a/lib/logl.c b/lib/logl.c index 42c50cb1a..0c00a2b22 100644 --- a/lib/logl.c +++ b/lib/logl.c @@ -26,8 +26,23 @@ logl (long double x) return log (x); } +#elif HAVE_LOGL + +long double +logl (long double x) +# undef logl +{ + /* Work around the OSF/1 5.1 bug. */ + if (x == 0.0L) + /* Return -Infinity. */ + return -1.0L / 0.0L; + return logl (x); +} + #else +/* Code based on glibc/sysdeps/ieee754/ldbl-128/e_logl.c. */ + /* logll.c * * Natural logarithm for 128-bit long double precision.