[flang] Accept polymorphic component element in storage_size
[llvm-project.git] / flang / test / Lower / module-debug-file-loc.f90
blob69a21d84183dd799aec7c16648b7bc749c57924d
1 ! Test that the module has the location information
3 ! RUN: %flang_fc1 -mmlir --mlir-print-debuginfo -emit-fir -o - %s | FileCheck %s
5 subroutine sb1()
6 end subroutine
8 ! CHECK: module attributes
9 ! CHECK: func.func @_QPsb1() {
10 ! CHECK: }
11 ! CHECK: } loc(#[[MODULE_LOC:.*]])
12 ! CHECK: #[[MODULE_LOC]] = loc("{{.*}}module-debug-file-loc.f90":0:0)