aboutsummaryrefslogtreecommitdiff
path: root/gcc/testsuite/gcc.dg/gomp/bad-array-section-c-4.c
blob: b78cdfc8a13e46119e9fb630480c89fc0e807cac (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
/* { dg-do compile } */

int x;

int main()
{
  int arr[20];
  int *ptr;
  /* "arr[1:10]" looks like it might be an expression of array type, hence
     able to be indexed (again).  This isn't allowed, though.  */
#pragma omp target map(arr[1:10][2])
/* { dg-error {'arr\[1\]' does not have pointer or array type} "" { target *-*-* } .-1 } */
  { }
#pragma omp target map(arr[1:x][2])
/* { dg-error {'arr\[1\]' does not have pointer or array type} "" { target *-*-* } .-1 } */
  { }
  /* ...and nor is this.  */
#pragma omp target map(ptr[1:10][2])
/* { dg-error {'\*\(ptr \+ [0-9]+\)' does not have pointer or array type} "" { target *-*-* } .-1 } */
  { }
#pragma omp target map(ptr[1:x][2])
/* { dg-error {'\*\(ptr \+ [0-9]+\)' does not have pointer or array type} "" { target *-*-* } .-1 } */
  { }

  return 0;
}