blob: a7d2979b050cbdeec7989b208ad0e55e6ccc7f91 (
plain) (
tree)
|
|
.global atan2
.type atan2,@function
atan2:
fldl 4(%esp)
fldl 12(%esp)
fpatan
fstl 4(%esp)
mov 8(%esp),%eax
add %eax,%eax
cmp $0x00200000,%eax
jae 1f
# subnormal x, return x with underflow
fnstsw %ax
and $16,%ax
jnz 1f
fsts 4(%esp)
1: ret
|