1// RUN: fir-opt --add-debug-info --mlir-print-debuginfo %s | FileCheck %s 2 3module attributes {dlti.dl_spec = #dlti.dl_spec<>} { 4 func.func private @_FortranAioBeginExternalListOutput(i8) -> !fir.ref<i8> loc(#loc1) 5} 6#loc1 = loc("test.f90":5:1) 7 8// CHECK: #[[INT8_TY:.*]] = #llvm.di_basic_type<tag = DW_TAG_base_type, name = "integer", sizeInBits = 8, encoding = DW_ATE_signed> 9// CHECK: #[[REF_TY:.*]] = #llvm.di_derived_type<tag = DW_TAG_pointer_type, name = "", baseType = #[[INT8_TY]]{{.*}}> 10// CHECK: #llvm.di_subroutine_type<{{.*}}types = #[[REF_TY]], #[[INT8_TY]]> 11