11.8Sriastrad/*	$NetBSD: s_atan.S,v 1.8 2024/06/09 13:35:38 riastradh Exp $	*/
21.8Sriastrad
31.1Sjtc/*
41.6Ssalo * Written by J.T. Conklin <jtc@NetBSD.org>.
51.3Sjtc * Public domain.
61.1Sjtc */
71.1Sjtc
81.1Sjtc#include <machine/asm.h>
91.1Sjtc
101.5Sfvdl#include "abi.h"
111.5Sfvdl
121.8SriastradRCSID("$NetBSD: s_atan.S,v 1.8 2024/06/09 13:35:38 riastradh Exp $")
131.2Sjtc
141.7SriastradWEAK_ALIAS(atan, _atan)
151.7Sriastrad
161.7SriastradENTRY(_atan)
171.5Sfvdl	XMM_ONE_ARG_DOUBLE_PROLOGUE
181.5Sfvdl	fldl	ARG_DOUBLE_ONE
191.1Sjtc	fld1
201.1Sjtc	fpatan
211.5Sfvdl	XMM_DOUBLE_EPILOGUE
221.1Sjtc	ret
231.7SriastradEND(_atan)
24