xref: /haiku/src/system/libroot/posix/musl/math/x86/remainderl.s (revision f504f61099b010fbfa94b1cc63d2e9072c7f7185)
1*f504f610SAugustin Cavalier.global remainderl
2*f504f610SAugustin Cavalier.type remainderl,@function
3*f504f610SAugustin Cavalierremainderl:
4*f504f610SAugustin Cavalier	fldt 16(%esp)
5*f504f610SAugustin Cavalier	fldt 4(%esp)
6*f504f610SAugustin Cavalier1:	fprem1
7*f504f610SAugustin Cavalier	fnstsw %ax
8*f504f610SAugustin Cavalier	sahf
9*f504f610SAugustin Cavalier	jp 1b
10*f504f610SAugustin Cavalier	fstp %st(1)
11*f504f610SAugustin Cavalier	ret
12