[PATCH v2 2/3] msvcr120: Add expm1.
Alex Henrie
alexhenrie24 at gmail.com
Fri Jul 14 00:14:20 CDT 2017
Needed for the game Children of a Dead Earth, see
http://childrenofadeadearth.boards.net/thread/112/coade-on-linux-working-1?page=1&scrollTo=524
Signed-off-by: Alex Henrie <alexhenrie24 at gmail.com>
---
configure.ac | 2 ++
.../api-ms-win-crt-math-l1-1-0.spec | 6 ++--
dlls/msvcr120/msvcr120.spec | 6 ++--
dlls/msvcr120_app/msvcr120_app.spec | 6 ++--
dlls/msvcrt/math.c | 36 ++++++++++++++++++++++
dlls/ucrtbase/ucrtbase.spec | 6 ++--
6 files changed, 50 insertions(+), 12 deletions(-)
diff --git a/configure.ac b/configure.ac
index 5bee74ab96..0362826f40 100644
--- a/configure.ac
+++ b/configure.ac
@@ -2608,6 +2608,8 @@ AC_CHECK_FUNCS(\
erff \
exp2 \
exp2f \
+ expm1 \
+ expm1f \
lgamma \
lgammaf \
llrint \
diff --git a/dlls/api-ms-win-crt-math-l1-1-0/api-ms-win-crt-math-l1-1-0.spec b/dlls/api-ms-win-crt-math-l1-1-0/api-ms-win-crt-math-l1-1-0.spec
index a1668bb8f2..9ed215f0df 100644
--- a/dlls/api-ms-win-crt-math-l1-1-0/api-ms-win-crt-math-l1-1-0.spec
+++ b/dlls/api-ms-win-crt-math-l1-1-0/api-ms-win-crt-math-l1-1-0.spec
@@ -231,9 +231,9 @@
@ cdecl exp2f(float) ucrtbase.exp2f
@ cdecl exp2l(double) ucrtbase.exp2l
@ cdecl -arch=arm,x86_64 expf(float) ucrtbase.expf
-@ stub expm1
-@ stub expm1f
-@ stub expm1l
+@ cdecl expm1(double) ucrtbase.expm1
+@ cdecl expm1f(float) ucrtbase.expm1f
+@ cdecl expm1l(double) ucrtbase.expm1l
@ cdecl fabs(double) ucrtbase.fabs
@ cdecl -arch=arm fabsf(float) ucrtbase.fabsf
@ stub fdim
diff --git a/dlls/msvcr120/msvcr120.spec b/dlls/msvcr120/msvcr120.spec
index d44812a264..407c86cd49 100644
--- a/dlls/msvcr120/msvcr120.spec
+++ b/dlls/msvcr120/msvcr120.spec
@@ -2134,9 +2134,9 @@
@ cdecl exp2f(float) MSVCR120_exp2f
@ cdecl exp2l(double) MSVCR120_exp2l
@ cdecl -arch=arm,x86_64 expf(float) MSVCRT_expf
-@ stub expm1
-@ stub expm1f
-@ stub expm1l
+@ cdecl expm1(double) MSVCR120_expm1
+@ cdecl expm1f(float) MSVCR120_expm1f
+@ cdecl expm1l(double) MSVCR120_expm1l
@ cdecl fabs(double) MSVCRT_fabs
@ cdecl -arch=arm,x86_64 fabsf(float) MSVCRT_fabsf
@ cdecl fclose(ptr) MSVCRT_fclose
diff --git a/dlls/msvcr120_app/msvcr120_app.spec b/dlls/msvcr120_app/msvcr120_app.spec
index 8c3ecfd1d3..8858f43d90 100644
--- a/dlls/msvcr120_app/msvcr120_app.spec
+++ b/dlls/msvcr120_app/msvcr120_app.spec
@@ -1800,9 +1800,9 @@
@ cdecl exp2f(float) msvcr120.exp2f
@ cdecl exp2l(double) msvcr120.exp2l
@ cdecl -arch=arm,x86_64 expf(float) msvcr120.expf
-@ stub expm1
-@ stub expm1f
-@ stub expm1l
+@ cdecl expm1(double) msvcr120.expm1
+@ cdecl expm1f(float) msvcr120.expm1f
+@ cdecl expm1l(double) msvcr120.expm1l
@ cdecl fabs(double) msvcr120.fabs
@ cdecl -arch=arm,x86_64 fabsf(float) msvcr120.fabsf
@ cdecl fclose(ptr) msvcr120.fclose
diff --git a/dlls/msvcrt/math.c b/dlls/msvcrt/math.c
index 89c45c794c..ec8e38bd7a 100644
--- a/dlls/msvcrt/math.c
+++ b/dlls/msvcrt/math.c
@@ -2412,6 +2412,42 @@ LDOUBLE CDECL MSVCR120_exp2l(LDOUBLE x)
}
/*********************************************************************
+ * expm1 (MSVCR120.@)
+ */
+double CDECL MSVCR120_expm1(double x)
+{
+#ifdef HAVE_EXPM1
+ double ret = expm1(x);
+#else
+ double ret = exp(x) - 1;
+#endif
+ if (!isfinite(ret)) *MSVCRT__errno() = MSVCRT_ERANGE;
+ return ret;
+}
+
+/*********************************************************************
+ * expm1f (MSVCR120.@)
+ */
+float CDECL MSVCR120_expm1f(float x)
+{
+#ifdef HAVE_EXPM1F
+ double ret = expm1f(x);
+#else
+ double ret = exp(x) - 1;
+#endif
+ if (!isfinite(ret)) *MSVCRT__errno() = MSVCRT_ERANGE;
+ return ret;
+}
+
+/*********************************************************************
+ * expm1l (MSVCR120.@)
+ */
+LDOUBLE CDECL MSVCR120_expm1l(LDOUBLE x)
+{
+ return MSVCR120_expm1(x);
+}
+
+/*********************************************************************
* log2 (MSVCR120.@)
*/
double CDECL MSVCR120_log2(double x)
diff --git a/dlls/ucrtbase/ucrtbase.spec b/dlls/ucrtbase/ucrtbase.spec
index 017f086fc1..0d799fd2ae 100644
--- a/dlls/ucrtbase/ucrtbase.spec
+++ b/dlls/ucrtbase/ucrtbase.spec
@@ -2277,9 +2277,9 @@
@ cdecl exp2f(float) MSVCR120_exp2f
@ cdecl exp2l(double) MSVCR120_exp2l
@ cdecl -arch=arm,x86_64 expf(float) MSVCRT_expf
-@ stub expm1
-@ stub expm1f
-@ stub expm1l
+@ cdecl expm1(double) MSVCR120_expm1
+@ cdecl expm1f(float) MSVCR120_expm1f
+@ cdecl expm1l(double) MSVCR120_expm1l
@ cdecl fabs(double) MSVCRT_fabs
@ cdecl -arch=arm fabsf(float) MSVCRT_fabsf
@ cdecl fclose(ptr) MSVCRT_fclose
--
2.13.2
More information about the wine-patches
mailing list