18 lines
460 B
Fortran
18 lines
460 B
Fortran
! RUN: %python %S/../test_errors.py %s %flang_fc1 -fopenmp
|
|
! OpenMP Version 5.1
|
|
! Check OpenMP construct validity for the following directives:
|
|
! 2.14.7 Declare Target Directive
|
|
|
|
module mod1
|
|
end
|
|
|
|
program main
|
|
use mod1
|
|
|
|
!ERROR: The module name or main program name cannot be in a DECLARE TARGET directive
|
|
!$omp declare target (mod1)
|
|
|
|
!ERROR: The module name or main program name cannot be in a DECLARE TARGET directive
|
|
!$omp declare target (main)
|
|
end
|