flang/test/Semantics/OpenMP/declare-target06.f90

   1 ! RUN: %python %S/../test_errors.py %s %flang_fc1 -fopenmp -fopenmp-version=52
   2 ! OpenMP Version 5.1
   3 ! Check OpenMP construct validity for the following directives:
   4 ! 2.14.7 Declare Target Directive
   5 ! When used in an implicit none context.
   6
   7 module test_0
   8     implicit none
   9 !ERROR: No explicit type declared for 'no_implicit_materialization_1'
  10 !$omp declare target(no_implicit_materialization_1)
  11
  12 !ERROR: No explicit type declared for 'no_implicit_materialization_2'
  13 !$omp declare target link(no_implicit_materialization_2)
  14
  15 !WARNING: The usage of TO clause on DECLARE TARGET directive has been deprecated. Use ENTER clause instead.
  16 !ERROR: No explicit type declared for 'no_implicit_materialization_3'
  17 !$omp declare target to(no_implicit_materialization_3)
  18
  19 !$omp declare target enter(no_implicit_materialization_3)
  20
  21 INTEGER :: data_int = 10
  22 !$omp declare target(data_int)
  23 end module test_0