xref: /openbsd/lib/libm/arch/amd64/s_atan.S (revision d415bd75)
1/*	$OpenBSD: s_atan.S,v 1.4 2018/07/03 22:43:34 mortimer Exp $ */
2/*
3 * Written by J.T. Conklin <jtc@NetBSD.org>.
4 * Public domain.
5 */
6
7#include <machine/asm.h>
8
9#include "abi.h"
10
11ENTRY(atan)
12	RETGUARD_SETUP(atan, r11)
13	XMM_ONE_ARG_DOUBLE_PROLOGUE
14	fldl	ARG_DOUBLE_ONE
15	fld1
16	fpatan
17	XMM_DOUBLE_EPILOGUE
18	RETGUARD_CHECK(atan, r11)
19	ret
20END(atan)
21