diff options
| author | Francois-Xavier Coudert <coudert@clipper.ens.fr> | 2006-10-08 20:39:18 +0200 |
|---|---|---|
| committer | François-Xavier Coudert <fxcoudert@gcc.gnu.org> | 2006-10-08 18:39:18 +0000 |
| commit | 456d9b174d46f034fa4a0ab21d4670ebdb7ac292 (patch) | |
| tree | 8cd2f39c4b110855cbbed4135365949160a13206 /libgfortran/intrinsics/c99_functions.c | |
| parent | 22ae47e29c7d0d80e5c83120167063eaafc10db9 (diff) | |
| download | gcc-456d9b174d46f034fa4a0ab21d4670ebdb7ac292.zip gcc-456d9b174d46f034fa4a0ab21d4670ebdb7ac292.tar.gz gcc-456d9b174d46f034fa4a0ab21d4670ebdb7ac292.tar.bz2 | |
hyper.c: Remove file.
* intrinsics/hyper.c: Remove file.
* intrinsics/c99_functions.c: Add fallback functions asinhf,
acoshf and atanhf.
* Makefile.am: Remove file intrinsics/hyper.c.
* Makefile.in: Regenerate.
From-SVN: r117560
Diffstat (limited to 'libgfortran/intrinsics/c99_functions.c')
| -rw-r--r-- | libgfortran/intrinsics/c99_functions.c | 25 |
1 files changed, 24 insertions, 1 deletions
diff --git a/libgfortran/intrinsics/c99_functions.c b/libgfortran/intrinsics/c99_functions.c index e26be0e..86867a2 100644 --- a/libgfortran/intrinsics/c99_functions.c +++ b/libgfortran/intrinsics/c99_functions.c @@ -76,7 +76,6 @@ float complex clog10f(float complex); double complex clog10(double complex); long double complex clog10l(long double complex); - #ifndef HAVE_ACOSF #define HAVE_ACOSF 1 float @@ -86,6 +85,14 @@ acosf(float x) } #endif +#if HAVE_ACOSH && !HAVE_ACOSHF +float +acoshf (float x) +{ + return (float) acosh ((double) x); +} +#endif + #ifndef HAVE_ASINF #define HAVE_ASINF 1 float @@ -95,6 +102,14 @@ asinf(float x) } #endif +#if HAVE_ASINH && !HAVE_ASINHF +float +asinhf (float x) +{ + return (float) asinh ((double) x); +} +#endif + #ifndef HAVE_ATAN2F #define HAVE_ATAN2F 1 float @@ -113,6 +128,14 @@ atanf(float x) } #endif +#if HAVE_ATANH && !HAVE_ATANHF +float +atanhf (float x) +{ + return (float) atanh ((double) x); +} +#endif + #ifndef HAVE_CEILF #define HAVE_CEILF 1 float |