1  /* PR c/96678.  */
       2  
       3  #define SIZE   (100)
       4  typedef double Grid[SIZE];
       5  
       6  void test (Grid src1)
       7  {
       8    #pragma omp target map(alloc:src1[:])  /* { dg-error "for array function parameter length expression must be specified" }  */
       9    {
      10      src1[0] = 5;
      11    }
      12  }
      13  
      14  void test2 (double src2[])
      15  {
      16    #pragma omp target map(alloc:src2[:])  /* { dg-error "for array function parameter length expression must be specified" }  */
      17    {
      18      src2[0] = 5;
      19    }
      20  }
      21  
      22  void test3 (double *src3)
      23  {
      24    #pragma omp target map(alloc:src3[:])  /* { dg-error "for pointer type length expression must be specified" }  */
      25    {
      26      src3[0] = 5;
      27    }
      28  }
      29