File tree Expand file tree Collapse file tree 1 file changed +13
-0
lines changed Expand file tree Collapse file tree 1 file changed +13
-0
lines changed Original file line number Diff line number Diff line change @@ -18,6 +18,19 @@ program allocate_tree
1818 allocate (w, xarray(4 ), zarray(t, z))
1919end 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 ->
You can’t perform that action at this time.
0 commit comments