blob: 9f13d95ffb57ff8418d291b9951e1771f166ba5c [file] [log] [blame]
.global log1pf
.type log1pf,@function
log1pf:
mov 4(%esp),%eax
fldln2
and $0x7fffffff,%eax
flds 4(%esp)
cmp $0x3e940000,%eax
ja 1f
cmp $0x00800000,%eax
jb 2f
fyl2xp1
fstps 4(%esp)
flds 4(%esp)
ret
1: fld1
faddp
fyl2x
fstps 4(%esp)
flds 4(%esp)
ret
# subnormal x, return x with underflow
2: fxch
fmul %st(1)
fstps 4(%esp)
ret