1/*
2 * Public domain.
3 */
4
5#include <machine/asm.h>
6#include <i386-math-asm.h>
7#include <libm-alias-double.h>
8
9RCSID("$NetBSD: s_atan.S,v 1.4 1995/05/08 23:50:41 jtc Exp $")
10
11DEFINE_DBL_MIN
12
13#ifdef PIC
14# define MO(op) op##@GOTOFF(%ecx)
15#else
16# define MO(op) op
17#endif
18
19	.text
20ENTRY(__atan)
21#ifdef  PIC
22	LOAD_PIC_REG (cx)
23#endif
24	fldl	4(%esp)
25	fld1
26	fpatan
27	DBL_CHECK_FORCE_UFLOW
28	ret
29END (__atan)
30libm_alias_double (__atan, atan)
31