From 79715cce88ef372eb56374f14c4771b748029105 Mon Sep 17 00:00:00 2001 From: Alex Henrie Date: Thu, 13 Jul 2017 23:14:20 -0600 Subject: [PATCH] msvcr120: Add expm1. Signed-off-by: Alex Henrie Signed-off-by: Piotr Caban Signed-off-by: Alexandre Julliard --- configure | 2 ++ 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 ++-- include/config.h.in | 6 ++++ 8 files changed, 58 insertions(+), 12 deletions(-) diff --git a/configure b/configure index c6e24d0891f..f1b9549f0df 100755 --- a/configure +++ b/configure @@ -17421,6 +17421,8 @@ for ac_func in \ erff \ exp2 \ exp2f \ + expm1 \ + expm1f \ lgamma \ lgammaf \ llrint \ diff --git a/configure.ac b/configure.ac index 5bee74ab961..0362826f400 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 a1668bb8f21..9ed215f0dfb 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 d44812a2646..407c86cd499 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 8c3ecfd1d36..8858f43d90c 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 89c45c794ce..ec8e38bd7a1 100644 --- a/dlls/msvcrt/math.c +++ b/dlls/msvcrt/math.c @@ -2411,6 +2411,42 @@ LDOUBLE CDECL MSVCR120_exp2l(LDOUBLE x) return MSVCR120_exp2(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.@) */ diff --git a/dlls/ucrtbase/ucrtbase.spec b/dlls/ucrtbase/ucrtbase.spec index 017f086fc19..0d799fd2ae4 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 diff --git a/include/config.h.in b/include/config.h.in index e5b646586d8..5ab518c200c 100644 --- a/include/config.h.in +++ b/include/config.h.in @@ -156,6 +156,12 @@ /* Define to 1 if you have the `exp2f' function. */ #undef HAVE_EXP2F +/* Define to 1 if you have the `expm1' function. */ +#undef HAVE_EXPM1 + +/* Define to 1 if you have the `expm1f' function. */ +#undef HAVE_EXPM1F + /* Define to 1 if you have the `fallocate' function. */ #undef HAVE_FALLOCATE