2.9
[glibc/nacl-glibc.git] / sysdeps / x86_64 / fpu / s_sincos.S
blob9a33615340decd1d2557f920dcd2d19a1ec0c224
1 /* Compute sine and cosine of argument.
2    Copyright (C) 1997, 2000, 2001, 2005 Free Software Foundation, Inc.
3    This file is part of the GNU C Library.
4    Contributed by Ulrich Drepper <drepper@cygnus.com>, 1997.
6    The GNU C Library is free software; you can redistribute it and/or
7    modify it under the terms of the GNU Lesser General Public
8    License as published by the Free Software Foundation; either
9    version 2.1 of the License, or (at your option) any later version.
11    The GNU C Library is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14    Lesser General Public License for more details.
16    You should have received a copy of the GNU Lesser General Public
17    License along with the GNU C Library; if not, write to the Free
18    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
19    02111-1307 USA.  */
21 #include <machine/asm.h>
22 #include "bp-sym.h"
23 #include "bp-asm.h"
25 #define PARMS   LINKAGE         /* no space for saved regs */
26 #define ANGLE   PARMS
27 #define SINP    ANGLE+12
28 #define COSP    SINP+PTR_SIZE
30         .text
31 ENTRY (BP_SYM (__sincos))
32         ENTER
34         movsd   %xmm0, -8(%rsp)
35         fldl    -8(%rsp)
36         fsincos
37         fnstsw  %ax
38         testl   $0x400,%eax
39         jnz     1f
40         fstpl   (%rsi)
41         fstpl   (%rdi)
43         LEAVE
44         retq
46 1:      fldpi
47         fadd    %st(0)
48         fxch    %st(1)
49 2:      fprem1
50         fnstsw  %ax
51         testl   $0x400,%eax
52         jnz     2b
53         fstp    %st(1)
54         fsincos
55         fstpl   (%rsi)
56         fstpl   (%rdi)
58         LEAVE
59         retq
60 END (BP_SYM (__sincos))
61 weak_alias (BP_SYM (__sincos), BP_SYM (sincos))