1  /* { dg-do run } */
       2  
       3  /* PR middle-end/63247 */
       4  
       5  #include <stdlib.h>
       6  
       7  int
       8  main(int argc, char **argv)
       9  {
      10  #define N 4
      11      short a[N];
      12  
      13      a[0] = 10;
      14      a[1] = 10;
      15      a[2] = 10;
      16      a[3] = 10;
      17  
      18  #pragma acc parallel copy(a[1:N-1])
      19      {
      20        a[1] = 51;
      21        a[2] = 52;
      22        a[3] = 53;
      23      }
      24  
      25      if (a[0] != 10)
      26        abort ();
      27      if (a[1] != 51)
      28        abort ();
      29      if (a[2] != 52)
      30        abort ();
      31      if (a[3] != 53)
      32        abort ();
      33  
      34      return 0;
      35  }