13 lines · plain
1! RUN: %python %S/test_errors.py %s %flang_fc12program testcriticalconstruct3 4 Start_name_only: Critical5 !ERROR: CRITICAL construct name required but missing6 End critical !C1117 in the Fortran 2018 standard7 8 critical9 !ERROR: CRITICAL construct name unexpected10 end critical end_name_only !C1117 in Fortran 2018 standard11 12end program13