| ! RUN: %flang_fc1 -emit-llvm -debug-info-kind=standalone %s -o - | FileCheck %s | |
| module helper | |
| implicit none | |
| contains | |
| subroutine fn (a1, a2) | |
| integer a1(5, *), a2(*) | |
| print *, a1(1,1) | |
| print *, a2(2) | |
| end subroutine fn | |
| end module helper | |
| ! CHECK-DAG: ![[TY1:[0-9]+]] = !DICompositeType(tag: DW_TAG_array_type{{.*}}elements: ![[ELEMS1:[0-9]+]]{{.*}}) | |
| ! CHECK-DAG: ![[ELEMS1]] = !{![[ELM1:[0-9]+]], ![[EMPTY:[0-9]+]]} | |
| ! CHECK-DAG: ![[ELM1]] = !DISubrange(count: 5) | |
| ! CHECK-DAG: ![[EMPTY]] = !DISubrange() | |
| ! CHECK-DAG: ![[TY2:[0-9]+]] = !DICompositeType(tag: DW_TAG_array_type{{.*}}elements: ![[ELEMS2:[0-9]+]]{{.*}}) | |
| ! CHECK-DAG: ![[ELEMS2]] = !{![[EMPTY:[0-9]+]]} | |
| ! CHECK-DAG: !DILocalVariable(name: "a1"{{.*}}type: ![[TY1:[0-9]+]]) | |
| ! CHECK-DAG: !DILocalVariable(name: "a2"{{.*}}type: ![[TY2:[0-9]+]]) |