flang/test/Semantics/OpenMP/defaultmap-clause-v50.f90

   1 !RUN: %python %S/../test_errors.py %s %flang -fopenmp -fopenmp-version=50 -Werror
   2
   3 subroutine f00
   4   !$omp target defaultmap(tofrom)
   5   !$omp end target
   6 end
   7
   8 subroutine f01
   9   !$omp target defaultmap(tofrom:aggregate)
  10   !$omp end target
  11 end
  12
  13 subroutine f02
  14   !$omp target defaultmap(from:scalar)
  15   !$omp end target
  16 end
  17
  18 subroutine f03
  19 !WARNING: ALL is not allowed in OpenMP v5.0, try -fopenmp-version=52
  20   !$omp target defaultmap(tofrom:all)
  21   !$omp end target
  22 end
  23