summaryrefslogblamecommitdiff
path: root/src/math/i386/remainderl.s
blob: 009787290767ea2f801aef7a33b307147be584f7 (plain) (tree)
1
2
3
4
5
6
7
8
9
10
11










                          
.global remainderl
.type remainderl,@function
remainderl:
	fldt 16(%esp)
	fldt 4(%esp)
1:	fprem1
	fstsw %ax
	sahf
	jp 1b
	fstp %st(1)
	ret