12 lines · plain
1! Test -fsave-main-program switch.2! RUN: %flang_fc1 -emit-hlfir -o - %s | FileCheck --check-prefix=CHECK-DEFAULT %s3! RUN: %flang_fc1 -fsave-main-program -emit-hlfir -o - %s | FileCheck --check-prefix=CHECK-SAVE %s4! RUN: %flang_fc1 -fsave-main-program -fno-save-main-program -emit-hlfir -o - %s | FileCheck --check-prefix=CHECK-DEFAULT %s5program test6integer :: i7call foo(i)8end9 10!CHECK-DEFAULT-NOT: fir.global internal @_QFEi11!CHECK-SAVE: fir.global internal @_QFEi12