/* { dg-do compile } */
/* { dg-options "-fopenmp -fdump-tree-gimple" } */
/* { dg-additional-options "-std=c++98" { target c++ } } */

int bar (int, int);
void baz (int, int *);
#pragma omp declare target enter (baz)

void
foo (int x, int *p)
{
  #pragma omp target map (iterator (i=0:4), to: p[bar (x, i)])
    baz (x, p);
}

/* { dg-final { scan-tree-dump "firstprivate\\\(x\\\)" "gimple" } } */
/* { dg-final { scan-tree-dump-times "bar \\\(x, i\\\)" 2 "gimple" } } */
/* { dg-final { scan-tree-dump-times "map\\\(iterator\\\(int i=0:4:1, loop_label=" 2 "gimple" } } */