view gcc/testsuite/c-c++-common/gomp/nesting-1.c @ 111:04ced10e8804

gcc 7
author kono
date Fri, 27 Oct 2017 22:46:09 +0900
parents
children
line wrap: on
line source

extern int i;

void
f_omp_parallel (void)
{
#pragma omp parallel
  {
#pragma omp parallel
    ;

#pragma omp target
    ;

#pragma omp target data map(i)
    ;

#pragma omp target update to(i)

#pragma omp target data map(i)
    {
#pragma omp parallel
      ;

#pragma omp target
      ;

#pragma omp target data map(i)
      ;

#pragma omp target update to(i)
    }
  }
}

void
f_omp_target (void)
{
#pragma omp target
  {
#pragma omp parallel
    ;
  }
}

void
f_omp_target_data (void)
{
#pragma omp target data map(i)
  {
#pragma omp parallel
    ;

#pragma omp target
    ;

#pragma omp target data map(i)
    ;

#pragma omp target update to(i)

#pragma omp target data map(i)
    {
#pragma omp parallel
      ;

#pragma omp target
      ;

#pragma omp target data map(i)
      ;

#pragma omp target update to(i)
    }
  }
}