]> git.ipfire.org Git - thirdparty/glibc.git/blame - sysdeps/x86_64/fpu/test-double-libmvec-sincos-main.c
Update copyright dates with scripts/update-copyrights.
[thirdparty/glibc.git] / sysdeps / x86_64 / fpu / test-double-libmvec-sincos-main.c
CommitLineData
fe0cf861 1/* Test for vector sincos ABI.
d614a753 2 Copyright (C) 2016-2020 Free Software Foundation, Inc.
fe0cf861
L
3 This file is part of the GNU C Library.
4
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
9
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Lesser General Public License for more details.
14
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, see
5a82c748 17 <https://www.gnu.org/licenses/>. */
fe0cf861
L
18
19#include <math.h>
20
21#define N 1000
22double x[N], s[N], c[N];
23double* s_ptrs[N];
24double* c_ptrs[N];
25
26int
27test_sincos_abi (void)
28{
29 int i;
30
31 for(i = 0; i < N; i++)
32 {
33 x[i] = i / 3;
34 s_ptrs[i] = &s[i];
35 c_ptrs[i] = &c[i];
36 }
37
38#pragma omp simd
39 for(i = 0; i < N; i++)
40 sincos (x[i], s_ptrs[i], c_ptrs[i]);
41
42 return 0;
43}