log1pf.s raw

   1  .global log1pf
   2  .type log1pf,@function
   3  log1pf:
   4  	mov 4(%esp),%eax
   5  	fldln2
   6  	and $0x7fffffff,%eax
   7  	flds 4(%esp)
   8  	cmp $0x3e940000,%eax
   9  	ja 1f
  10  	cmp $0x00800000,%eax
  11  	jb 2f
  12  	fyl2xp1
  13  	fstps 4(%esp)
  14  	flds 4(%esp)
  15  	ret
  16  1:	fld1
  17  	faddp
  18  	fyl2x
  19  	fstps 4(%esp)
  20  	flds 4(%esp)
  21  	ret
  22  		# subnormal x, return x with underflow
  23  2:	fxch
  24  	fmul %st(1)
  25  	fstps 4(%esp)
  26  	ret
  27