X-Git-Url: http://nsz.repo.hu/git/?p=musl;a=blobdiff_plain;f=src%2Ffenv%2Fi386%2Ffenv.s;h=e365b8f418bd19ff2e00d35b0ff6e848065d4dce;hp=647b7961ca0dfc113958f4ffd67b7d58816e5b04;hb=316e024f63af0d0d2bb0df3dfce2620f4be827d1;hpb=9cb6878e747909c7a45dd1c4dd550ac62e1f7690;ds=sidebyside 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