/* { dg-do compile } */
/* { dg-additional-options "-fdump-tree-gimple" } */

struct S {
  int x,y;
};

#pragma omp declare mapper(default : struct S var) map(mapper(default), tofrom: var)
#pragma omp declare mapper(only_x : struct S var) map(mapper(default), tofrom: var.x)

void f(){
  struct S z = {1,2};
#pragma omp target defaultmap(alloc)
  z.x += 5;
#pragma omp target map(z)
  z.x += 7;
#pragma omp target map(mapper(default), tofrom: z)
  z.x += 8;
#pragma omp target map(mapper(only_x), tofrom: z)
  z.x += 9;
if (z.x != 1+5+7+8+9) __builtin_abort ();
}

/* { dg-final { scan-tree-dump-times "#pragma omp target num_teams\\(-2\\) thread_limit\\(0\\) defaultmap\\(alloc\\) map\\(tofrom:z \\\[len: 8\\\]\\)" 1 "gimple" } }  */
/* { dg-final { scan-tree-dump-times "#pragma omp target num_teams\\(-2\\) thread_limit\\(0\\) map\\(tofrom:z \\\[len: 8\\\]\\)" 2 "gimple" } }  */
/* { dg-final { scan-tree-dump-times "#pragma omp target num_teams\\(-2\\) thread_limit\\(0\\) map\\(struct:z \\\[len: 1\\\]\\) map\\(tofrom:z.x \\\[len: 4\\\]\\)" 1 "gimple" } }  */

int main() {
  f();
}