summaryrefslogtreecommitdiff
path: root/libgfortran/intrinsics
diff options
context:
space:
mode:
authortobi <tobi@138bc75d-0d04-0410-961f-82ee72b054a4>2004-09-26 14:52:04 +0000
committertobi <tobi@138bc75d-0d04-0410-961f-82ee72b054a4>2004-09-26 14:52:04 +0000
commita2d7a3ff6603a97188b69e3d64058f2093c43f71 (patch)
tree83ba7c3fdfa6dc0151b0448bd885ef881eaed0cc /libgfortran/intrinsics
parentec6973f6307cfec75c07725dc6e9f46653225f2c (diff)
downloadgcc-a2d7a3ff6603a97188b69e3d64058f2093c43f71.tar.gz
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. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@88128 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgfortran/intrinsics')
-rw-r--r--libgfortran/intrinsics/c99_functions.c9
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. */