Welcome to mirror list, hosted at ThFree Co, Russian Federation.

cygwin.com/git/newlib-cygwin.git - Unnamed repository; edit this file 'description' to name the repository.
summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat (limited to 'newlib/libm/common/sf_fma.c')
-rw-r--r--newlib/libm/common/sf_fma.c36
1 files changed, 36 insertions, 0 deletions
diff --git a/newlib/libm/common/sf_fma.c b/newlib/libm/common/sf_fma.c
new file mode 100644
index 000000000..3b4bcc1ce
--- /dev/null
+++ b/newlib/libm/common/sf_fma.c
@@ -0,0 +1,36 @@
+/* Copyright (C) 2002 by Red Hat, Incorporated. All rights reserved.
+ *
+ * Permission to use, copy, modify, and distribute this software
+ * is freely granted, provided that this notice is preserved.
+ */
+
+#include "fdlibm.h"
+
+#ifdef __STDC__
+ float fmaf(float x, float y, float z)
+#else
+ float fmaf(x,y,z)
+ float x;
+ float y;
+ float z;
+#endif
+{
+ /* Let the implementation handle this. */
+ return (x * y) + z;
+}
+
+#ifdef _DOUBLE_IS_32BITS
+
+#ifdef __STDC__
+ double fma(double x, double y, double z)
+#else
+ double fma(x,y,z)
+ double x;
+ double y;
+ double z;
+#endif
+{
+ return (double) fmaf((float) x, (float) y, (float) z);
+}
+
+#endif /* defined(_DOUBLE_IS_32BITS) */