Mercurial > hg > CbC > CbC_gcc

annotate gcc/testsuite/c-c++-common/gomp/depend-4.c @ 111:04ced10e8804

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
gcc 7
author kono
date Fri, 27 Oct 2017 22:46:09 +0900
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
111
kono
parents:
diff changeset
1 /* { dg-do compile } */
kono
parents:
diff changeset
2 /* { dg-options "-fopenmp" } */
kono
parents:
diff changeset
3
kono
parents:
diff changeset
4 void
kono
parents:
diff changeset
5 foo (int *p, int (*q)[10], int r[10], int s[10][10])
kono
parents:
diff changeset
6 {
kono
parents:
diff changeset
7 int a[10], b[10][10];
kono
parents:
diff changeset
8 #pragma omp task depend (inout: p[-1:2])
kono
parents:
diff changeset
9 ;
kono
parents:
diff changeset
10 #pragma omp task depend (inout: q[-1:2][2:4])
kono
parents:
diff changeset
11 ;
kono
parents:
diff changeset
12 #pragma omp task depend (inout: q[-1:2][-2:4]) /* { dg-error "negative low bound in array section in" } */
kono
parents:
diff changeset
13 ;
kono
parents:
diff changeset
14 #pragma omp task depend (inout: r[-1:2])
kono
parents:
diff changeset
15 ;
kono
parents:
diff changeset
16 #pragma omp task depend (inout: s[-1:2][2:4])
kono
parents:
diff changeset
17 ;
kono
parents:
diff changeset
18 #pragma omp task depend (inout: s[-1:2][-2:4]) /* { dg-error "negative low bound in array section in" } */
kono
parents:
diff changeset
19 ;
kono
parents:
diff changeset
20 #pragma omp task depend (inout: a[-1:2]) /* { dg-error "negative low bound in array section in" } */
kono
parents:
diff changeset
21 ;
kono
parents:
diff changeset
22 #pragma omp task depend (inout: b[-1:2][2:4]) /* { dg-error "negative low bound in array section in" } */
kono
parents:
diff changeset
23 ;
kono
parents:
diff changeset
24 #pragma omp task depend (inout: b[1:2][-2:4]) /* { dg-error "negative low bound in array section in" } */
kono
parents:
diff changeset
25 ;
kono
parents:
diff changeset
26 #pragma omp task depend (inout: p[2:-3]) /* { dg-error "negative length in array section in" } */
kono
parents:
diff changeset
27 ;
kono
parents:
diff changeset
28 #pragma omp task depend (inout: q[2:-3][:]) /* { dg-error "negative length in array section in" } */
kono
parents:
diff changeset
29 ;
kono
parents:
diff changeset
30 #pragma omp task depend (inout: q[2:3][0:-1]) /* { dg-error "negative length in array section in" } */
kono
parents:
diff changeset
31 ;
kono
parents:
diff changeset
32 #pragma omp task depend (inout: r[2:-5]) /* { dg-error "negative length in array section in" } */
kono
parents:
diff changeset
33 ;
kono
parents:
diff changeset
34 #pragma omp task depend (inout: s[2:-5][:]) /* { dg-error "negative length in array section in" } */
kono
parents:
diff changeset
35 ;
kono
parents:
diff changeset
36 #pragma omp task depend (inout: s[2:5][0:-4]) /* { dg-error "negative length in array section in" } */
kono
parents:
diff changeset
37 ;
kono
parents:
diff changeset
38 #pragma omp task depend (inout: a[2:-5]) /* { dg-error "negative length in array section in" } */
kono
parents:
diff changeset
39 ;
kono
parents:
diff changeset
40 #pragma omp task depend (inout: b[2:-5][0:10]) /* { dg-error "negative length in array section in" } */
kono
parents:
diff changeset
41 ;
kono
parents:
diff changeset
42 #pragma omp task depend (inout: b[2:5][0:-4]) /* { dg-error "negative length in array section in" } */
kono
parents:
diff changeset
43 ;
kono
parents:
diff changeset
44 }