s_tanf.S revision 1.1 
1/*
2 * Written by J.T. Conklin <jtc@netbsd.org>.
3 * Public domain.
4 */
5
6#include <machine/asm.h>
7
8RCSID("$NetBSD: s_tanf.S,v 1.3 1995/05/09 00:31:09 jtc Exp $")
9
10/* A float's domain isn't large enough to require argument reduction. */
11ENTRY(tanf)
12	flds	4(%esp)
13	fptan
14	fstp	%st(0)
15	ret
16