summaryrefslogtreecommitdiff
path: root/src/fenv/i386/fenv.s
diff options
context:
space:
mode:
Diffstat (limited to 'src/fenv/i386/fenv.s')
-rw-r--r--src/fenv/i386/fenv.s36
1 files changed, 20 insertions, 16 deletions
diff --git a/src/fenv/i386/fenv.s b/src/fenv/i386/fenv.s
index 647b7961..e365b8f4 100644
--- a/src/fenv/i386/fenv.s
+++ b/src/fenv/i386/fenv.s
@@ -1,30 +1,34 @@
-2: not %ecx
+.global feclearexcept
+.type feclearexcept,@function
+feclearexcept:
+ mov 4(%esp),%ecx
+ not %ecx
+ test $0x3f,%ecx
+ jnz 2f
+1: fnclex
+ xor %eax,%eax
+ ret
+2: fnstsw %ax
+ and %ecx,%eax
+ jz 1b
sub $32,%esp
fnstenv (%esp)
- and %ecx,4(%esp)
- or %edx,4(%esp)
+ mov %al,4(%esp)
fldenv (%esp)
add $32,%esp
- ret
-
-.global feclearexcept
-.type feclearexcept,@function
-feclearexcept:
xor %eax,%eax
- mov 4(%esp),%ecx
- xor %edx,%edx
- test %ecx,%ecx
- jnz 2b
ret
.global feraiseexcept
.type feraiseexcept,@function
feraiseexcept:
+ mov 4(%esp),%eax
+ sub $32,%esp
+ fnstenv (%esp)
+ or %al,4(%esp)
+ fldenv (%esp)
+ add $32,%esp
xor %eax,%eax
- mov 4(%esp),%edx
- xor %ecx,%ecx
- test %edx,%edx
- jnz 2b
ret
.global fesetround