2009-07-17 Chris Sutcliffe <ir0nh34d@users.sourceforge.net>

* mingwex/math/cephes_mconf.h mingwex/math/erfl.c mingwex/math/lgamma.c
        mingwex/math/lgammal.c mingwex/math/powl.c mingwex/math/sinhl.c
        mingwex/math/tanhl.c mingwex/math/tgamma.c mingwex/math/tgammal.c: Based on
        the fixes from the mingw-w64 code tree, fixed strict-aliasing issues.
This commit is contained in:
Chris Sutcliffe
2009-07-18 01:39:52 +00:00
parent c627d4ddd0
commit b5fb6b0dc3
10 changed files with 307 additions and 300 deletions

View File

@@ -68,17 +68,16 @@ static long double Q[] = {
#endif
#ifdef IBMPC
static unsigned short P[] = {
0xd2a4,0x1b0c,0x8f15,0x8f99,0xbff1, XPD
0x5959,0x9111,0x9cc7,0xf4e2,0xbffe, XPD
0xb576,0xef5e,0x6d57,0xa81b,0xc005, XPD
0xe3be,0xbfbd,0x5cbc,0xa381,0xc009, XPD
static uLD P[] = {
{ { 0xd2a4,0x1b0c,0x8f15,0x8f99,0xbff1, XPD } },
{ { 0x5959,0x9111,0x9cc7,0xf4e2,0xbffe, XPD } },
{ { 0xb576,0xef5e,0x6d57,0xa81b,0xc005, XPD } },
{ { 0xe3be,0xbfbd,0x5cbc,0xa381,0xc009, XPD } }
};
static unsigned short Q[] = {
/*0x0000,0x0000,0x0000,0x8000,0x3fff,*/
0x687f,0xce24,0xdd6c,0xc084,0x4005, XPD
0x3793,0xc95f,0xfa2f,0xe3b9,0x4009, XPD
0xd5a2,0x1f9c,0x0b1b,0xf542,0x400a, XPD
static uLD Q[] = {
{ { 0x687f,0xce24,0xdd6c,0xc084,0x4005, XPD } },
{ { 0x3793,0xc95f,0xfa2f,0xe3b9,0x4009, XPD } },
{ { 0xd5a2,0x1f9c,0x0b1b,0xf542,0x400a, XPD } }
};
#endif