[NFC][RISCV] Remove CFIIndex argument from allocateStack (#117871)
[llvm-project.git] / flang / test / Semantics / multi-programs02.f90
blob33ac83312215a88df16d87e42e58650d9ff9382b
1 ! RUN: %python %S/test_errors.py %s %flang_fc1
2 ! Test the restriction in 5.2.2
4 program m
5 end
6 !ERROR: A source file cannot contain more than one main program
7 end