1 ; This test verifies that the proper DWARF debug info is emitted
2 ; for a trampoline function.
4 ; RUN: llc -filetype=obj %s -o - | llvm-dwarfdump - | FileCheck %s
6 ; CHECK: DW_TAG_subprogram
8 ; CHECK: DW_AT_linkage_name ("sub1_.t0p")
9 ; CHECK-NEXT: DW_AT_name ("sub1_.t0p")
10 ; CHECK-NEXT: DW_AT_trampoline ("sub1_")
13 source_filename = "main.f"
14 target datalayout = "e-m:e-p270:32:32-p271:32:32-p272:64:64-i64:64-f80:128-n8:16:32:64-S128"
15 target triple = "x86_64-unknown-linux-gnu"
17 define internal void @sub1_.t0p(ptr %arg0) #0 !dbg !23 {
19 call void (...) @sub1_(ptr %arg0), !dbg !25
23 declare void @sub1_(...)
25 attributes #0 = { noinline nounwind optnone uwtable "frame-pointer"="all" "intel-lang"="fortran" "loopopt-pipeline"="light" "min-legal-vector-width"="0" "target-cpu"="x86-64" "target-features"="+cx8,+fxsr,+mmx,+sse,+sse2,+x87" }
27 !llvm.module.flags = !{!12, !13}
29 !omp_offload.info = !{}
31 !4 = !DIFile(filename: "main.f", directory: "/dir")
32 !5 = !DISubroutineType(types: !6)
34 !7 = distinct !DICompileUnit(language: DW_LANG_Fortran95, file: !4, producer: "Intel(R) Fortran 22.0-1483", isOptimized: false, runtimeVersion: 0, emissionKind: FullDebug, splitDebugInlining: false, nameTableKind: None)
35 !12 = !{i32 2, !"Debug Info Version", i32 3}
36 !13 = !{i32 2, !"Dwarf Version", i32 4}
37 !23 = distinct !DISubprogram(name: "sub1_.t0p", linkageName: "sub1_.t0p", scope: !4, file: !4, type: !5, spFlags: DISPFlagLocalToUnit | DISPFlagDefinition, unit: !7, retainedNodes: !24, targetFuncName: "sub1_")
39 !25 = !DILocation(line: 0, scope: !23)