1! RUN: bbc %s --pft-test | FileCheck %s 2! RUN: bbc %s -o "-" -emit-fir | FileCheck %s --check-prefix=FIR 3 4program basic 5end program 6 7! CHECK: 1 Program basic 8! CHECK: 1 EndProgramStmt: end program 9! CHECK: End Program basic 10 11! FIR-LABEL: func @_QQmain() attributes {fir.bindc_name = "basic"} { 12! FIR: return 13! FIR: } 14