msvcp90: Added complex hyperbolic functions implementation.

This commit is contained in:
Piotr Caban 2013-01-24 12:29:21 +01:00 committed by Alexandre Julliard
parent 66ee663e0c
commit b0cb2ead33
2 changed files with 88 additions and 18 deletions

View File

@ -1340,6 +1340,38 @@ complex_float* __cdecl complex_float_tan(complex_float *ret, const complex_float
return ret;
}
/* ??$cosh@M@std@@YA?AV?$complex@M@0@ABV10@@Z */
/* ??$cosh@M@std@@YA?AV?$complex@M@0@AEBV10@@Z */
complex_float* __cdecl complex_float_cosh(complex_float *ret, const complex_float *c)
{
ret->real = cosh(c->real)*cos(c->imag);
ret->imag = sinh(c->real)*sin(c->imag);
return ret;
}
/* ??$sinh@M@std@@YA?AV?$complex@M@0@ABV10@@Z */
/* ??$sinh@M@std@@YA?AV?$complex@M@0@AEBV10@@Z */
complex_float* __cdecl complex_float_sinh(complex_float *ret, const complex_float *c)
{
ret->real = sinh(c->real)*cos(c->imag);
ret->imag = cosh(c->real)*sin(c->imag);
return ret;
}
/* ??$tanh@M@std@@YA?AV?$complex@M@0@ABV10@@Z */
/* ??$tanh@M@std@@YA?AV?$complex@M@0@AEBV10@@Z */
complex_float* __cdecl complex_float_tanh(complex_float *ret, const complex_float *c)
{
complex_float tmp;
ret->real = -c->imag;
ret->imag = c->real;
complex_float_tan(&tmp, ret);
ret->real = tmp.imag;
ret->imag = -tmp.real;
return ret;
}
/* ??0?$_Complex_base@NU_C_double_complex@@@std@@QAE@ABN0@Z */
/* ??0?$_Complex_base@NU_C_double_complex@@@std@@QEAA@AEBN0@Z */
/* ??0?$_Complex_base@OU_C_ldouble_complex@@@std@@QAE@ABO0@Z */
@ -1882,3 +1914,41 @@ complex_double* __cdecl complex_double_tan(complex_double *ret, const complex_do
ret->imag = sinh(2*c->imag) / denom;
return ret;
}
/* ??$cosh@N@std@@YA?AV?$complex@N@0@ABV10@@Z */
/* ??$cosh@N@std@@YA?AV?$complex@N@0@AEBV10@@Z */
/* ??$cosh@O@std@@YA?AV?$complex@O@0@ABV10@@Z */
/* ??$cosh@O@std@@YA?AV?$complex@O@0@AEBV10@@Z */
complex_double* __cdecl complex_double_cosh(complex_double *ret, const complex_double *c)
{
ret->real = cosh(c->real)*cos(c->imag);
ret->imag = sinh(c->real)*sin(c->imag);
return ret;
}
/* ??$sinh@N@std@@YA?AV?$complex@N@0@ABV10@@Z */
/* ??$sinh@N@std@@YA?AV?$complex@N@0@AEBV10@@Z */
/* ??$sinh@O@std@@YA?AV?$complex@O@0@ABV10@@Z */
/* ??$sinh@O@std@@YA?AV?$complex@O@0@AEBV10@@Z */
complex_double* __cdecl complex_double_sinh(complex_double *ret, const complex_double *c)
{
ret->real = sinh(c->real)*cos(c->imag);
ret->imag = cosh(c->real)*sin(c->imag);
return ret;
}
/* ??$tanh@N@std@@YA?AV?$complex@N@0@ABV10@@Z */
/* ??$tanh@N@std@@YA?AV?$complex@N@0@AEBV10@@Z */
/* ??$tanh@O@std@@YA?AV?$complex@O@0@ABV10@@Z */
/* ??$tanh@O@std@@YA?AV?$complex@O@0@AEBV10@@Z */
complex_double* __cdecl complex_double_tanh(complex_double *ret, const complex_double *c)
{
complex_double tmp;
ret->real = -c->imag;
ret->imag = c->real;
complex_double_tan(&tmp, ret);
ret->real = tmp.imag;
ret->imag = -tmp.real;
return ret;
}

View File

@ -374,12 +374,12 @@
@ cdecl -arch=win64 ??$cos@N@std@@YA?AV?$complex@N@0@AEBV10@@Z(ptr ptr) complex_double_cos
@ cdecl -arch=win32 ??$cos@O@std@@YA?AV?$complex@O@0@ABV10@@Z(ptr ptr) complex_double_cos
@ cdecl -arch=win64 ??$cos@O@std@@YA?AV?$complex@O@0@AEBV10@@Z(ptr ptr) complex_double_cos
@ stub -arch=win32 ??$cosh@M@std@@YA?AV?$complex@M@0@ABV10@@Z
@ stub -arch=win64 ??$cosh@M@std@@YA?AV?$complex@M@0@AEBV10@@Z
@ stub -arch=win32 ??$cosh@N@std@@YA?AV?$complex@N@0@ABV10@@Z
@ stub -arch=win64 ??$cosh@N@std@@YA?AV?$complex@N@0@AEBV10@@Z
@ stub -arch=win32 ??$cosh@O@std@@YA?AV?$complex@O@0@ABV10@@Z
@ stub -arch=win64 ??$cosh@O@std@@YA?AV?$complex@O@0@AEBV10@@Z
@ cdecl -arch=win32 ??$cosh@M@std@@YA?AV?$complex@M@0@ABV10@@Z(ptr ptr) complex_float_cosh
@ cdecl -arch=win64 ??$cosh@M@std@@YA?AV?$complex@M@0@AEBV10@@Z(ptr ptr) complex_float_cosh
@ cdecl -arch=win32 ??$cosh@N@std@@YA?AV?$complex@N@0@ABV10@@Z(ptr ptr) complex_double_cosh
@ cdecl -arch=win64 ??$cosh@N@std@@YA?AV?$complex@N@0@AEBV10@@Z(ptr ptr) complex_double_cosh
@ cdecl -arch=win32 ??$cosh@O@std@@YA?AV?$complex@O@0@ABV10@@Z(ptr ptr) complex_double_cosh
@ cdecl -arch=win64 ??$cosh@O@std@@YA?AV?$complex@O@0@AEBV10@@Z(ptr ptr) complex_double_cosh
@ stub -arch=win32 ??$exp@M@std@@YA?AV?$complex@M@0@ABV10@@Z
@ stub -arch=win64 ??$exp@M@std@@YA?AV?$complex@M@0@AEBV10@@Z
@ stub -arch=win32 ??$exp@N@std@@YA?AV?$complex@N@0@ABV10@@Z
@ -470,12 +470,12 @@
@ cdecl -arch=win64 ??$sin@N@std@@YA?AV?$complex@N@0@AEBV10@@Z(ptr ptr) complex_double_sin
@ cdecl -arch=win32 ??$sin@O@std@@YA?AV?$complex@O@0@ABV10@@Z(ptr ptr) complex_double_sin
@ cdecl -arch=win64 ??$sin@O@std@@YA?AV?$complex@O@0@AEBV10@@Z(ptr ptr) complex_double_sin
@ stub -arch=win32 ??$sinh@M@std@@YA?AV?$complex@M@0@ABV10@@Z
@ stub -arch=win64 ??$sinh@M@std@@YA?AV?$complex@M@0@AEBV10@@Z
@ stub -arch=win32 ??$sinh@N@std@@YA?AV?$complex@N@0@ABV10@@Z
@ stub -arch=win64 ??$sinh@N@std@@YA?AV?$complex@N@0@AEBV10@@Z
@ stub -arch=win32 ??$sinh@O@std@@YA?AV?$complex@O@0@ABV10@@Z
@ stub -arch=win64 ??$sinh@O@std@@YA?AV?$complex@O@0@AEBV10@@Z
@ cdecl -arch=win32 ??$sinh@M@std@@YA?AV?$complex@M@0@ABV10@@Z(ptr ptr) complex_float_sinh
@ cdecl -arch=win64 ??$sinh@M@std@@YA?AV?$complex@M@0@AEBV10@@Z(ptr ptr) complex_float_sinh
@ cdecl -arch=win32 ??$sinh@N@std@@YA?AV?$complex@N@0@ABV10@@Z(ptr ptr) complex_double_sinh
@ cdecl -arch=win64 ??$sinh@N@std@@YA?AV?$complex@N@0@AEBV10@@Z(ptr ptr) complex_double_sinh
@ cdecl -arch=win32 ??$sinh@O@std@@YA?AV?$complex@O@0@ABV10@@Z(ptr ptr) complex_double_sinh
@ cdecl -arch=win64 ??$sinh@O@std@@YA?AV?$complex@O@0@AEBV10@@Z(ptr ptr) complex_double_sinh
@ stub -arch=win32 ??$sqrt@M@std@@YA?AV?$complex@M@0@ABV10@@Z
@ stub -arch=win64 ??$sqrt@M@std@@YA?AV?$complex@M@0@AEBV10@@Z
@ stub -arch=win32 ??$sqrt@N@std@@YA?AV?$complex@N@0@ABV10@@Z
@ -488,12 +488,12 @@
@ cdecl -arch=win64 ??$tan@N@std@@YA?AV?$complex@N@0@AEBV10@@Z(ptr ptr) complex_double_tan
@ cdecl -arch=win32 ??$tan@O@std@@YA?AV?$complex@O@0@ABV10@@Z(ptr ptr) complex_double_tan
@ cdecl -arch=win64 ??$tan@O@std@@YA?AV?$complex@O@0@AEBV10@@Z(ptr ptr) complex_double_tan
@ stub -arch=win32 ??$tanh@M@std@@YA?AV?$complex@M@0@ABV10@@Z
@ stub -arch=win64 ??$tanh@M@std@@YA?AV?$complex@M@0@AEBV10@@Z
@ stub -arch=win32 ??$tanh@N@std@@YA?AV?$complex@N@0@ABV10@@Z
@ stub -arch=win64 ??$tanh@N@std@@YA?AV?$complex@N@0@AEBV10@@Z
@ stub -arch=win32 ??$tanh@O@std@@YA?AV?$complex@O@0@ABV10@@Z
@ stub -arch=win64 ??$tanh@O@std@@YA?AV?$complex@O@0@AEBV10@@Z
@ cdecl -arch=win32 ??$tanh@M@std@@YA?AV?$complex@M@0@ABV10@@Z(ptr ptr) complex_float_tanh
@ cdecl -arch=win64 ??$tanh@M@std@@YA?AV?$complex@M@0@AEBV10@@Z(ptr ptr) complex_float_tanh
@ cdecl -arch=win32 ??$tanh@N@std@@YA?AV?$complex@N@0@ABV10@@Z(ptr ptr) complex_double_tanh
@ cdecl -arch=win64 ??$tanh@N@std@@YA?AV?$complex@N@0@AEBV10@@Z(ptr ptr) complex_double_tanh
@ cdecl -arch=win32 ??$tanh@O@std@@YA?AV?$complex@O@0@ABV10@@Z(ptr ptr) complex_double_tanh
@ cdecl -arch=win64 ??$tanh@O@std@@YA?AV?$complex@O@0@AEBV10@@Z(ptr ptr) complex_double_tanh
@ thiscall -arch=win32 ??0?$_Complex_base@MU_C_float_complex@@@std@@QAE@ABM0@Z(ptr ptr ptr) complex_float_ctor
@ cdecl -arch=win64 ??0?$_Complex_base@MU_C_float_complex@@@std@@QEAA@AEBM0@Z(ptr ptr ptr) complex_float_ctor
@ thiscall -arch=win32 ??0?$_Complex_base@NU_C_double_complex@@@std@@QAE@ABN0@Z(ptr ptr ptr) complex_double_ctor