* mingwex/math/round.c: Rewrite.
* mingwex/math/roundf.c: Rewrite. * mingwex/math/roundl.c: Rewrite.
This commit is contained in:
@@ -1,29 +1,8 @@
|
||||
#include <fenv.h>
|
||||
#include <math.h>
|
||||
|
||||
double
|
||||
round (double x) {
|
||||
double retval;
|
||||
unsigned short saved_cw, _cw;
|
||||
__asm__ (
|
||||
"fnstcw %0;"
|
||||
: "=m" (saved_cw)
|
||||
); /* save control word */
|
||||
_cw = ~(FE_TONEAREST | FE_DOWNWARD | FE_UPWARD | FE_TOWARDZERO)
|
||||
| (x > 0.0 ? FE_UPWARD : FE_DOWNWARD); /* round away from zero */
|
||||
__asm__ (
|
||||
"fldcw %0;"
|
||||
:
|
||||
: "m" (_cw)
|
||||
); /* load the rounding control */
|
||||
__asm__ (
|
||||
"frndint;"
|
||||
: "=t" (retval)
|
||||
: "0" (x)
|
||||
); /* do the rounding */
|
||||
__asm__ (
|
||||
"fldcw %0;"
|
||||
:
|
||||
: "m" (saved_cw)
|
||||
); /* restore control word */
|
||||
return retval;
|
||||
round (double x)
|
||||
{
|
||||
/* Add +/- 0.5 then then round towards zero. */
|
||||
return trunc ( x + (x >= 0.0 ? 0.5 : -0.5));
|
||||
}
|
||||
|
Reference in New Issue
Block a user