xref: /openbsd/lib/libm/arch/i387/s_tanf.S (revision 2f2c0062) 
1/*	$OpenBSD: s_tanf.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 <machine/asm.h>
8
9/* A float's domain isn't large enough to require argument reduction. */
10ENTRY(tanf)
11	flds	4(%esp)
12	fptan
13	fstp	%st(0)
14	ret
15END(tanf)
16