1  /* { dg-do link } */
       2  
       3  /* For -O0, ICEd in nvptx backend due to unexpected frame size.  */
       4  #pragma acc routine worker
       5  void
       6  worker_matmul (int *c, int i)
       7  {
       8    int j;
       9  
      10  #pragma acc loop
      11    for (j = 0; j < 4; j++)
      12      c[j] = j;
      13  }
      14  
      15  
      16  int
      17  main ()
      18  {
      19    int c[4];
      20  
      21  #pragma acc parallel 
      22    {
      23      worker_matmul (c, 0);
      24    }
      25    
      26    return 0;
      27  }