diff options
| author | Tobias Schlüter <tobias.schlueter@physik.uni-muenchen.de> | 2004-09-26 16:52:04 +0200 |
|---|---|---|
| committer | Tobias Schlüter <tobi@gcc.gnu.org> | 2004-09-26 16:52:04 +0200 |
| commit | bf4d99cf13529bf27567caaa6f305f276162d787 (patch) | |
| tree | 83ba7c3fdfa6dc0151b0448bd885ef881eaed0cc /libgfortran/intrinsics/c99_functions.c | |
| parent | 59c86e4b881c1d1c2e21424ae867c315ee713830 (diff) | |
| download | gcc-bf4d99cf13529bf27567caaa6f305f276162d787.tar.gz | |
re PR libfortran/16137 (Fortran compiler unable to produce executables as libfortran depends on C99 math functions)
PR libfortran/16137
* config.h.in (HAVE_POWF): Undefine.
* configure.ac: Check for 'powf' in library.
* configure: Regenerate.
* intrinsics/c99_functions.c (powf): New function.
From-SVN: r88128
Diffstat (limited to 'libgfortran/intrinsics/c99_functions.c')
| -rw-r--r-- | libgfortran/intrinsics/c99_functions.c | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/libgfortran/intrinsics/c99_functions.c b/libgfortran/intrinsics/c99_functions.c index eb805c36f08..8198e0093ee 100644 --- a/libgfortran/intrinsics/c99_functions.c +++ b/libgfortran/intrinsics/c99_functions.c @@ -245,6 +245,15 @@ nextafterf(float x, float y) } #endif + +#ifndef HAVE_POWF +float +powf(float x, float y) +{ + return (float) pow(x, y); +} +#endif + /* Note that if HAVE_FPCLASSIFY is not defined, then NaN is not handled */ /* Algorithm by Steven G. Kargl. */ |