d/freebsd-skq
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Optimise i387 trigonometric functions. Replace "andw 0x400,%ax \ jnz" with

Browse Source 
"sahf \ jp", "fprem1" with "fprem" and "fstsw %ax" with "fnstsw %ax".
This commit is contained in:
tijl 2012-09-16 16:58:49 +00:00
parent fdc252682f
commit 19adcfe770
3 changed files with 16 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
lib/msun/i387/s_cos.S
View File

@ -40,16 +40,16 @@ ENTRY(cos)
fldl 4(%esp)
fcos
fnstsw %ax
andw $0x400,%ax
jnz 1f
sahf
jp 1f
ret
1: fldpi
fadd %st(0)
fxch %st(1)
2: fprem1
2: fprem
fnstsw %ax
andw $0x400,%ax
jnz 2b
sahf
jp 2b
fstp %st(1)
fcos
ret

10
lib/msun/i387/s_sin.S
View File

@ -40,16 +40,16 @@ ENTRY(sin)
fldl 4(%esp)
fsin
fnstsw %ax
andw $0x400,%ax
jnz 1f
sahf
jp 1f
ret
1: fldpi
fadd %st(0)
fxch %st(1)
2: fprem1
2: fprem
fnstsw %ax
andw $0x400,%ax
jnz 2b
sahf
jp 2b
fstp %st(1)
fsin
ret

12
lib/msun/i387/s_tan.S
View File

@ -40,17 +40,17 @@ ENTRY(tan)
fldl 4(%esp)
fptan
fnstsw %ax
andw $0x400,%ax
jnz 1f
sahf
jp 1f
fstp %st(0)
ret
1: fldpi
fadd %st(0)
fxch %st(1)
2: fprem1
fstsw %ax
andw $0x400,%ax
jnz 2b
2: fprem
fnstsw %ax
sahf
jp 2b
fstp %st(1)
fptan
fstp %st(0)