File tree Expand file tree Collapse file tree 1 file changed +4
-2
lines changed Expand file tree Collapse file tree 1 file changed +4
-2
lines changed Original file line number Diff line number Diff line change @@ -15,7 +15,8 @@ function func() result(i)
15
15
contains
16
16
function func1 () result(i)
17
17
! $omp declare target enter(func1) indirect(.true.)
18
- ! CHECK: | | | | | OmpDeclareTargetSpecifier -> OmpDeclareTargetWithClause -> OmpClauseList -> OmpClause -> Enter -> OmpObjectList -> OmpObject -> Designator -> DataRef -> Name = 'func1'
18
+ ! CHECK: | | | | | OmpDeclareTargetSpecifier -> OmpDeclareTargetWithClause -> OmpClauseList -> OmpClause -> Enter -> OmpEnterClause
19
+ ! CHECK-NEXT: | | | | | | OmpObjectList -> OmpObject -> Designator -> DataRef -> Name = 'func1'
19
20
! CHECK-NEXT: | | | | | OmpClause -> Indirect -> OmpIndirectClause -> Scalar -> Logical -> Expr = '.true._4'
20
21
! CHECK-NEXT: | | | | | | LiteralConstant -> LogicalLiteralConstant
21
22
! CHECK-NEXT: | | | | | | | bool = 'true'
@@ -26,7 +27,8 @@ function func1() result(i)
26
27
27
28
function func2 () result(i)
28
29
! $omp declare target enter(func2) indirect
29
- ! CHECK: | | | | | OmpDeclareTargetSpecifier -> OmpDeclareTargetWithClause -> OmpClauseList -> OmpClause -> Enter -> OmpObjectList -> OmpObject -> Designator -> DataRef -> Name = 'func2'
30
+ ! CHECK: | | | | | OmpDeclareTargetSpecifier -> OmpDeclareTargetWithClause -> OmpClauseList -> OmpClause -> Enter -> OmpEnterClause
31
+ ! CHECK-NEXT: | | | | | | OmpObjectList -> OmpObject -> Designator -> DataRef -> Name = 'func2'
30
32
! CHECK-NEXT: | | | | | OmpClause -> Indirect -> OmpIndirectClause ->
31
33
character (1 ) :: i
32
34
i = ' b'
You can’t perform that action at this time.
0 commit comments