1 /* Testcase by Martin Michlmayr <tbm@cyrius.com> */
2 /* { dg-do compile } */
3 /* { dg-require-effective-target vect_long } */
11 extern H5Diterate (fill_iter_info *);
13 void test_select_fill_hyper_simple (long *offset)
18 fill_iter_info iter_info;
20 iter_info.coords = (long *) points;
21 for (i = 0, num_points = 0; j < (int) start[1]; j++, num_points++)
23 points[num_points][0] = i + start[0];
24 points[num_points][1] = j + start[1];
26 H5Diterate (&iter_info);
29 /* Needs interleaving support. */
30 /* { dg-final { scan-tree-dump-times "vectorized 1 loops" 1 "vect" { target { vect_interleave } } } } */
31 /* { dg-final { cleanup-tree-dump "vect" } } */