1- !
21! Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
32! See https://llvm.org/LICENSE.txt for license information.
43! SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
5- !
64
5+ ! REQUIRES: llvm-17
76! RUN: %flang -g -S -emit-llvm %s -o - | FileCheck %s
87module first
98integer :: var1 = 37
@@ -27,9 +26,11 @@ end program hello
2726! CHECK-DAG: ![[DBG_MOD1:[0-9]+]] = !DIModule({{.*}}, name: "first"
2827! CHECK-DAG: ![[DBG_DIC:[0-9]+]] = distinct !DICompileUnit({{.*}}, imports: ![[DBG_IMPORTS:[0-9]+]], nameTableKind: None
2928! CHECK-DAG: ![[DBG_MOD2:[0-9]+]] = !DIModule({{.*}}, name: "second"
30- ! CHECK-DAG: ![[DBG_IMPORTS]] = !{![[DBG_IE1:[0-9]+]], ![[DBG_IE2:[0-9]+]], ![[DBG_IE3:[0-9]+]]}
31- ! CHECK-DAG: ![[DBG_IE1]] = !DIImportedEntity(tag: DW_TAG_imported_module, scope: ![[DBG_SP1:[0-9]+]], entity: ![[DBG_MOD1]],
32- ! CHECK-DAG: ![[DBG_SP1]] = distinct !DISubprogram(name: "init", scope: ![[DBG_MOD2]]
33- ! CHECK-DAG: ![[DBG_IE2]] = !DIImportedEntity(tag: DW_TAG_imported_module, scope: ![[DBG_SP2:[0-9]+]], entity: ![[DBG_MOD1]],
34- ! CHECK-DAG: ![[DBG_SP2]] = distinct !DISubprogram(name: "hello", scope: ![[DBG_DIC]]
35- ! CHECK-DAG: ![[DBG_IE3]] = !DIImportedEntity(tag: DW_TAG_imported_module, scope: ![[DBG_SP2]], entity: ![[DBG_MOD2]],
29+ ! CHECK-DAG: ![[DBG_IMPORTS]] = !{}
30+ ! CHECK-DAG: ![[DBG_IE1:[0-9]+]] = !DIImportedEntity(tag: DW_TAG_imported_module, scope: ![[DBG_SP1:[0-9]+]], entity: ![[DBG_MOD1]],
31+ ! CHECK-DAG: ![[DBG_SP1]] = distinct !DISubprogram(name: "init", scope: ![[DBG_MOD2]], {{.*}}, retainedNodes: ![[RETAIN1:[0-9]+]]
32+ ! CHECK-DAG: ![[RETAIN1]] = !{![[DBG_IE1]]}
33+ ! CHECK-DAG: ![[DBG_IE2:[0-9]+]] = !DIImportedEntity(tag: DW_TAG_imported_module, scope: ![[DBG_SP2:[0-9]+]], entity: ![[DBG_MOD1]],
34+ ! CHECK-DAG: ![[DBG_IE3:[0-9]+]] = !DIImportedEntity(tag: DW_TAG_imported_module, scope: ![[DBG_SP2]], entity: ![[DBG_MOD2]],
35+ ! CHECK-DAG: ![[DBG_SP2]] = distinct !DISubprogram(name: "hello", scope: ![[DBG_DIC]], {{.*}}, retainedNodes: ![[RETAIN2:[0-9]+]]
36+ ! CHECK-DAG: ![[RETAIN2]] = !{![[DBG_IE2]], ![[DBG_IE3]]}
0 commit comments