xref: /plan9/sys/src/libc/386/sqrt.s (revision 219b2ee8daee37f4aad58d63f21287faa8e4ffdc)
1TEXT	sqrt(SB), $0
2	FMOVD	a+0(FP), F0
3
4	FTST
5	WAIT
6	FSTSW	AX
7	SAHF
8	JLO	bad
9
10	FSQRT
11	RET
12
13bad:
14	FMOVDP	F0, F0
15	CALL	NaN(SB)
16	RET
17