Skip to content

Commit 66d6313

Browse files
committed
Update one testcase to check for showing int values
1 parent 99d785b commit 66d6313

File tree

1 file changed

+13
-0
lines changed

1 file changed

+13
-0
lines changed

flang/test/Parser/OpenMP/allocate-tree.f90

Lines changed: 13 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -18,6 +18,19 @@ program allocate_tree
1818
allocate(w, xarray(4), zarray(t, z))
1919
end program allocate_tree
2020

21+
!CHECK: | | DeclarationConstruct -> SpecificationConstruct -> TypeDeclarationStmt
22+
!CHECK-NEXT: | | | DeclarationTypeSpec -> IntrinsicTypeSpec -> IntegerTypeSpec ->
23+
!CHECK-NEXT: | | | AttrSpec -> Allocatable
24+
!CHECK-NEXT: | | | EntityDecl
25+
!CHECK-NEXT: | | | | Name = 'w'
26+
!CHECK-NEXT: | | | EntityDecl
27+
!CHECK-NEXT: | | | | Name = 'xarray'
28+
!CHECK-NEXT: | | | | ArraySpec -> DeferredShapeSpecList -> int = '1'
29+
!CHECK-NEXT: | | | EntityDecl
30+
!CHECK-NEXT: | | | | Name = 'zarray'
31+
!CHECK-NEXT: | | | | ArraySpec -> DeferredShapeSpecList -> int = '2'
32+
33+
2134
!CHECK: | | ExecutionPartConstruct -> ExecutableConstruct -> OpenMPConstruct -> OpenMPExecutableAllocate
2235
!CHECK-NEXT: | | | Verbatim
2336
!CHECK-NEXT: | | | OmpClauseList ->

0 commit comments

Comments
 (0)