xref: /llvm-project/flang/test/Semantics/OpenMP/bad_module_subroutine.f90 (revision 41d5fed09e7d31922e7869c72116a4c3adc11a4a)
1*41d5fed0STom Eccles! RUN: %python %S/../test_errors.py %s %flang_fc1 -fopenmp
2*41d5fed0STom Eccles! Test that we don't crash on this code inside of openmp semantics checks
3*41d5fed0STom Eccles
4*41d5fed0STom Eccles!ERROR: 'e' is a MODULE procedure which must be declared within a MODULE or SUBMODULE
5*41d5fed0STom Ecclesimpure elemental module subroutine e()
6*41d5fed0STom Ecclesend subroutine
7