21 lines · plain
1! RUN: %flang_fc1 -emit-llvm -debug-info-kind=standalone %s -o - | FileCheck %s2 3module helper4 implicit none5 contains6 subroutine fn (a1, a2)7 integer a1(5, *), a2(*)8 print *, a1(1,1)9 print *, a2(2)10 end subroutine fn11end module helper12 13! CHECK-DAG: ![[TY1:[0-9]+]] = !DICompositeType(tag: DW_TAG_array_type{{.*}}elements: ![[ELEMS1:[0-9]+]]{{.*}})14! CHECK-DAG: ![[ELEMS1]] = !{![[ELM1:[0-9]+]], ![[EMPTY:[0-9]+]]}15! CHECK-DAG: ![[ELM1]] = !DISubrange(count: 5)16! CHECK-DAG: ![[EMPTY]] = !DISubrange()17! CHECK-DAG: ![[TY2:[0-9]+]] = !DICompositeType(tag: DW_TAG_array_type{{.*}}elements: ![[ELEMS2:[0-9]+]]{{.*}})18! CHECK-DAG: ![[ELEMS2]] = !{![[EMPTY:[0-9]+]]}19! CHECK-DAG: !DILocalVariable(name: "a1"{{.*}}type: ![[TY1:[0-9]+]])20! CHECK-DAG: !DILocalVariable(name: "a2"{{.*}}type: ![[TY2:[0-9]+]])21