1/*	$OpenBSD: s_sin.S,v 1.3 2016/09/12 19:47:02 guenther Exp $ */
2/*
3 * Written by J.T. Conklin <jtc@netbsd.org>.
4 * Public domain.
5 */
6
7#include "DEFS.h"
8
9ENTRY(sin)
10	fldl	4(%esp)
11	fsin
12	fnstsw	%ax
13	andw	$0x400,%ax
14	jnz	1f
15	ret
161:	fldpi
17	fadd	%st(0)
18	fxch	%st(1)
192:	fprem1
20	fnstsw	%ax
21	andw	$0x400,%ax
22	jnz	2b
23	fstp	%st(1)
24	fsin
25	ret
26END_STD(sin)
27