[DebugInfo] Enhance DIImportedEntity to accept children entities
New field `elements` is added to '!DIImportedEntity', representing
list of aliased entities.
This is needed to dump optimized debugging information where all names
in a module are imported, but a few names are imported with overriding
aliases.
Reviewed By: dblaikie
Differential Revision: https://reviews.llvm.org/D109343
diff --git a/llvm/test/Bitcode/DIImportedEntity_backward.ll b/llvm/test/Bitcode/DIImportedEntity_backward.ll
new file mode 100644
index 0000000..fcdd554f
--- /dev/null
+++ b/llvm/test/Bitcode/DIImportedEntity_backward.ll
@@ -0,0 +1,81 @@
+;; This test checks Backward compatibility of DIImportedEntity
+; REQUIRES: x86_64-linux
+
+; RUN: llvm-dis -o - %s.bc | FileCheck %s
+
+;Test whether DIImportedEntity are generated correctly.
+; CHECK: distinct !DICompileUnit(language: DW_LANG_Fortran90
+; CHECK-SAME: imports: [[IMPORTS:![0-9]+]]
+; CHECK: [[IMPORTS]] = !{[[IMPORT1:![0-9]+]], [[IMPORT2:![0-9]+]]}
+; CHECK: [[IMPORT1]] = !DIImportedEntity(tag: DW_TAG_imported_module, scope: {{![0-9]+}}, entity: {{![0-9]+}}, file: {{![0-9]+}}, line: {{[0-9]+}})
+; CHECK: [[IMPORT2]] = !DIImportedEntity(tag: DW_TAG_imported_declaration, name: "var4", scope: {{![0-9]+}}, entity: {{![0-9]+}}, file: {{![0-9]+}}, line: {{[0-9]+}})
+
+; ModuleID = 'DIImportedEntity_backward.bc'
+source_filename = "/tmp/usemodulealias.ll"
+
+%struct_mymod_8_ = type <{ [12 x i8] }>
+%struct.struct_ul_MAIN__348 = type { i8* }
+
+@_mymod_8_ = global %struct_mymod_8_ <{ [12 x i8] c"\0B\00\00\00\0C\00\00\00\0D\00\00\00" }>, align 64, !dbg !0, !dbg !7, !dbg !10
+@.C330_MAIN_ = internal constant i32 0
+@.C364_main_use_renamed = internal constant i32 25
+@.C330_main_use_renamed = internal constant i32 0
+@.C331_main_use_renamed = internal constant i64 0
+@.C359_main_use_renamed = internal constant i32 6
+@.C357_main_use_renamed = internal constant [18 x i8] c"usemodulealias.f90"
+@.C352_main_use_renamed = internal constant i32 12
+
+define i32 @mymod_() {
+.L.entry:
+ ret i32 undef
+}
+
+define void @MAIN_() !dbg !15 {
+L.entry:
+ %.S0000_353 = alloca %struct.struct_ul_MAIN__348, align 8
+ %0 = bitcast i32* @.C330_MAIN_ to i8*
+ %1 = bitcast void (...)* @fort_init to void (i8*, ...)*
+ call void (i8*, ...) %1(i8* %0)
+ br label %L.LB2_357
+
+L.LB2_357: ; preds = %L.entry
+ %2 = bitcast %struct.struct_ul_MAIN__348* %.S0000_353 to i64*, !dbg !22
+ call void @main_use_renamed(i64* %2), !dbg !22
+ ret void, !dbg !23
+}
+
+define internal void @main_use_renamed(i64* noalias %.S0000) !dbg !14 {
+L.entry:
+ ret void, !dbg !24
+}
+
+declare void @fort_init(...)
+
+!llvm.module.flags = !{!20, !21}
+!llvm.dbg.cu = !{!4}
+
+!0 = !DIGlobalVariableExpression(var: !1, expr: !DIExpression())
+!1 = distinct !DIGlobalVariable(name: "var1", scope: !2, file: !3, line: 2, type: !9, isLocal: false, isDefinition: true)
+!2 = !DIModule(scope: !4, name: "mymod", file: !3, line: 1)
+!3 = !DIFile(filename: "DIImportedEntity_backward.f90", directory: "/tmp")
+!4 = distinct !DICompileUnit(language: DW_LANG_Fortran90, file: !3, producer: " F90 Flang - 1.5 2017-05-01", isOptimized: false, flags: "'+flang usemodulealias.f90 -g -S -emit-llvm'", runtimeVersion: 0, emissionKind: FullDebug, enums: !5, retainedTypes: !5, globals: !6, imports: !12, nameTableKind: None)
+!5 = !{}
+!6 = !{!0, !7, !10}
+!7 = !DIGlobalVariableExpression(var: !8, expr: !DIExpression(DW_OP_plus_uconst, 4))
+!8 = distinct !DIGlobalVariable(name: "var2", scope: !2, file: !3, line: 3, type: !9, isLocal: false, isDefinition: true)
+!9 = !DIBasicType(name: "integer", size: 32, align: 32, encoding: DW_ATE_signed)
+!10 = !DIGlobalVariableExpression(var: !11, expr: !DIExpression(DW_OP_plus_uconst, 8))
+!11 = distinct !DIGlobalVariable(name: "var3", scope: !2, file: !3, line: 4, type: !9, isLocal: false, isDefinition: true)
+!12 = !{!13, !19}
+!13 = !DIImportedEntity(tag: DW_TAG_imported_module, scope: !14, entity: !2, file: !3, line: 10)
+!14 = distinct !DISubprogram(name: "use_renamed", scope: !15, file: !3, line: 10, type: !18, scopeLine: 10, flags: DIFlagAllCallsDescribed, spFlags: DISPFlagLocalToUnit | DISPFlagDefinition, unit: !4)
+!15 = distinct !DISubprogram(name: "main", scope: !4, file: !3, line: 7, type: !16, scopeLine: 7, flags: DIFlagAllCallsDescribed, spFlags: DISPFlagDefinition | DISPFlagMainSubprogram, unit: !4)
+!16 = !DISubroutineType(cc: DW_CC_program, types: !17)
+!17 = !{null}
+!18 = !DISubroutineType(types: !17)
+!19 = !DIImportedEntity(tag: DW_TAG_imported_declaration, name: "var4", scope: !14, entity: !1, file: !3, line: 10)
+!20 = !{i32 2, !"Dwarf Version", i32 4}
+!21 = !{i32 2, !"Debug Info Version", i32 3}
+!22 = !DILocation(line: 8, column: 1, scope: !15)
+!23 = !DILocation(line: 9, column: 1, scope: !15)
+!24 = !DILocation(line: 13, column: 1, scope: !14)
