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