summaryrefslogtreecommitdiff
path: root/src/math/i386/e_remainder.s
blob: 36d55f98ce236b40a0ceadb73da55940a023fe8f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
.global remainderf
.type remainderf,@function
remainderf:
	flds 8(%esp)
	flds 4(%esp)
	jmp 1f
	
.global remainder
.type remainder,@function
remainder:
	fldl 12(%esp)
	fldl 4(%esp)
1:	fprem1
	fstsw %ax
	sahf
	jp 1b
	fstp %st(1)
	ret