Blame sysdeps/i386/fpu/s_atan.S

Packit 6c4009
/*
Packit 6c4009
 * Written by J.T. Conklin <jtc@netbsd.org>.
Packit 6c4009
 * Public domain.
Packit 6c4009
 */
Packit 6c4009
Packit 6c4009
#include <machine/asm.h>
Packit 6c4009
#include <i386-math-asm.h>
Packit 6c4009
#include <libm-alias-double.h>
Packit 6c4009
Packit 6c4009
RCSID("$NetBSD: s_atan.S,v 1.4 1995/05/08 23:50:41 jtc Exp $")
Packit 6c4009
Packit 6c4009
DEFINE_DBL_MIN
Packit 6c4009
Packit 6c4009
#ifdef PIC
Packit 6c4009
# define MO(op) op##@GOTOFF(%ecx)
Packit 6c4009
#else
Packit 6c4009
# define MO(op) op
Packit 6c4009
#endif
Packit 6c4009
Packit 6c4009
	.text
Packit 6c4009
ENTRY(__atan)
Packit 6c4009
#ifdef  PIC
Packit 6c4009
	LOAD_PIC_REG (cx)
Packit 6c4009
#endif
Packit 6c4009
	fldl	4(%esp)
Packit 6c4009
	fld1
Packit 6c4009
	fpatan
Packit 6c4009
	DBL_CHECK_FORCE_UFLOW
Packit 6c4009
	ret
Packit 6c4009
END (__atan)
Packit 6c4009
libm_alias_double (__atan, atan)