blob: 8adb2e7edc120e1e4213692fe34d083cc11b32a9 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
|
/* Testcase by Martin Michlmayr <tbm@cyrius.com> */
/* { dg-do compile } */
/* { dg-require-effective-target vect_long } */
typedef struct
{
long *coords;
}
fill_iter_info;
extern H5Diterate (fill_iter_info *);
void test_select_fill_hyper_simple (long *offset)
{
long start[2];
int num_points;
long points[16][2];
fill_iter_info iter_info;
int i, j;
iter_info.coords = (long *) points;
for (i = 0, num_points = 0; j < (int) start[1]; j++, num_points++)
{
points[num_points][0] = i + start[0];
points[num_points][1] = j + start[1];
}
H5Diterate (&iter_info);
}
/* Needs interleaving support. */
/* { dg-final { scan-tree-dump-times "vectorized 1 loops" 1 "vect" { target { vect_interleave || vect_strided2 } } } } */
/* { dg-final { cleanup-tree-dump "vect" } } */
|
