xref: /openbsd/lib/libm/arch/amd64/e_remainder.S (revision 09467b48)
1/*	$OpenBSD: e_remainder.S,v 1.5 2018/07/03 22:43:34 mortimer Exp $ */
2/*
3 * Written by J.T. Conklin <jtc@NetBSD.org>.
4 * Public domain.
5 */
6
7#include <machine/asm.h>
8
9#include "abi.h"
10
11ENTRY(remainder)
12	RETGUARD_SETUP(remainder, r11)
13	XMM_TWO_ARG_DOUBLE_PROLOGUE
14	fldl	ARG_DOUBLE_TWO
15	fldl	ARG_DOUBLE_ONE
161:	fprem1
17	fstsw	%ax
18	btw	$10,%ax
19	jc	1b
20	fstp	%st(1)
21	XMM_DOUBLE_EPILOGUE
22	RETGUARD_CHECK(remainder, r11)
23	ret
24END_STD(remainder)
25