RepoMirrors
/
musl
mirror of git://git.musl-libc.org/musl
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

try fixing/optimizing x86_64 fenv exception code 

untested; may need followup-fixes.
This commit is contained in:
Rich Felker 2012-03-17 20:10:02 -04:00
parent 316e024f63
commit b60053e762
1 changed files with 25 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

45
src/fenv/x86_64/fenv.s
View File

@ -1,32 +1,37 @@
2: not %edi
sub $32,%rsp
fnstenv (%rsp)
and %edi,4(%rsp)
or %esi,4(%rsp)
fldenv (%rsp)
stmxcsr (%rsp)
and %edi,(%rsp)
ldmxcsr (%rsp)
add $32,%rsp
ret
.global feclearexcept .global feclearexcept
.type feclearexcept,@function .type feclearexcept,@function
feclearexcept: feclearexcept:
mov %edi,%ecx
not %ecx
stmxcsr -8(%rsp)
and %ecx,-8(%rsp)
ldmxcsr -8(%rsp)
test $0x3f,%ecx
jnz 2f
1: fnclex
xor %eax,%eax
ret
2: fnstsw %ax
and %ecx,%eax
jz 1b
sub $32,%rsp
fnstenv (%rsp)
mov %al,4(%rsp)
fldenv (%rsp)
add $32,%rsp
xor %eax,%eax xor %eax,%eax
xor %esi,%esi
test %edi,%edi
jnz 2b
ret ret
.global feraiseexcept .global feraiseexcept
.type feraiseexcept,@function .type feraiseexcept,@function
feraiseexcept: feraiseexcept:
stmxcsr -8(%rsp)
or %edi,-8(%rsp)
ldmxcsr -8(%rsp)
fnstenv -32(%rsp)
or %edi,-28(%rsp)
fldenv -32(%rsp)
xor %eax,%eax xor %eax,%eax
mov %edi,%esi
xor %edi,%edi
test %esi,%esi
jnz 2b
ret ret
.global fesetround .global fesetround