.global remquof
.type remquof,@function
remquof:
mov 12(%esp),%ecx
fldl 8(%esp)
fldl 4(%esp)
mov 11(%esp),%dh
xor 7(%esp),%dh
jmp 1f
.global remquol
.type remquol,@function
remquol:
mov 28(%esp),%ecx
fldl 16(%esp)
fldl 4(%esp)
mov 25(%esp),%dh
xor 13(%esp),%dh
jmp 1f
.global remquo
.type remquo,@function
remquo:
mov 20(%esp),%ecx
fldl 12(%esp)
fldl 4(%esp)
mov 19(%esp),%dh
xor 11(%esp),%dh
1: fprem1
fnstsw %ax
sahf
jp 1b
fstp %st(1)
mov %ah,%dl
shr %dl
and $1,%dl
mov %ah,%al
shr $5,%al
and $2,%al
or %al,%dl
mov %ah,%al
shl $2,%al
and $4,%al
or %al,%dl
test %dh,%dh
jns 1f
neg %dl
1: movsbl %dl,%edx
mov %edx,(%ecx)
ret
