Patrick Welche <prlw1@cam.ac.uk>
[netbsd-mini2440.git] / lib / libm / arch / i387 / s_cosf.S
blobf1da43cf4ef22555b5117ccd0fcc46c76ec703c3
1 /*
2  * Written by J.T. Conklin <jtc@NetBSD.org>.
3  * Public domain.
4  */
6 #include <machine/asm.h>
8 #include "abi.h"
10 RCSID("$NetBSD: s_cosf.S,v 1.5 2001/06/19 00:26:30 fvdl Exp $")
12 /* A float's domain isn't large enough to require argument reduction. */
13 ENTRY(cosf)
14         XMM_ONE_ARG_FLOAT_PROLOGUE
15         flds    ARG_FLOAT_ONE
16         fcos
17         XMM_FLOAT_EPILOGUE
18         ret