mirror of
https://github.com/llvm/llvm-project.git
synced 2025-04-17 03:36:37 +00:00
2c53840199
This is because the source name cannot be deconstructed from _QQmain Differential revision: https://reviews.llvm.org/D144295
14 lines
333 B
Fortran
14 lines
333 B
Fortran
! RUN: bbc %s --pft-test | FileCheck %s
|
|
! RUN: bbc %s -o "-" -emit-fir | FileCheck %s --check-prefix=FIR
|
|
|
|
program basic
|
|
end program
|
|
|
|
! CHECK: 1 Program basic
|
|
! CHECK: 1 EndProgramStmt: end program
|
|
! CHECK: End Program basic
|
|
|
|
! FIR-LABEL: func @_QQmain() attributes {fir.bindc_name = "basic"} {
|
|
! FIR: return
|
|
! FIR: }
|