Unified · Split
| @@ -597,6 +597,27 @@ extern "C" { · 596 unmodified lines | ||
| 597 | 597 | return retval; |
| 598 | 598 | } |
| 599 | 599 | |
| 600 | + #define FE_TONEAREST 0x0000 | |
| 601 | + #define FE_DOWNWARD 0x0400 | |
| 602 | + #define FE_UPWARD 0x0800 | |
| 603 | + #define FE_TOWARDZERO 0x0c00 | |
| 604 | + | |
| 605 | + __CRT_INLINE double trunc (double _x) | |
| 606 | + { | |
| 607 | + double retval; | |
| 608 | + unsigned short saved_cw; | |
| 609 | + unsigned short tmp_cw; | |
| 610 | + __asm__ ("fnstcw %0;" : "=m" (saved_cw)); /* save FPU control word */ | |
| 611 | + tmp_cw = (saved_cw & ~(FE_TONEAREST | FE_DOWNWARD | FE_UPWARD | FE_TOWARDZERO)) | |
| 612 | + | FE_TOWARDZERO; | |
| 613 | + __asm__ ("fldcw %0;" : : "m" (tmp_cw)); | |
| 614 | + __asm__ ("fldl %1;" | |
| 615 | + "frndint;" | |
| 616 | + "fstl %0;" : "=m" (retval) : "m" (_x)); /* round towards zero */ | |
| 617 | + __asm__ ("fldcw %0;" : : "m" (saved_cw) ); /* restore saved control word */ | |
| 618 | + return retval; | |
| 619 | + } | |
| 620 | + | |
| 600 | 621 | /* 7.12.9.6 */ |
| 601 | 622 | /* round away from zero, regardless of fpu control word settings */ |
| 602 | 623 | extern double __cdecl round (double); |