1 .global asinf
2 .type asinf,@function
3 asinf:
4 	flds 4(%esp)
5 	mov 4(%esp),%eax
6 	add %eax,%eax
7 	cmp $0x01000000,%eax
8 	jb 1f
9 	fld %st(0)
10 	fld1
11 	fsub %st(0),%st(1)
12 	fadd %st(2)
13 	fmulp
14 	fsqrt
15 	fpatan
16 	fstps 4(%esp)
17 	flds 4(%esp)
18 	ret
19 		# subnormal x, return x with underflow
20 1:	fld %st(0)
21 	fmul %st(1)
22 	fstps 4(%esp)
23 	ret
24