gcc/testsuite/gfortran.dg/coarray_9.f90

   1 ! { dg-do compile }
   2 !
   3 ! PR fortran/18918
   4 !
   5 ! Check for error if no -fcoarray= option has been given
   6 !
   7
   8 integer :: a
   9 integer :: b[*] ! { dg-error "Coarrays disabled" }
  10
  11 error stop "Error"
  12 sync all !  "Coarrays disabled"  (but error above is fatal)
  13
  14 critical ! "Coarrays disabled"  (but error above is fatal)
  15
  16 end critical ! "Expecting END PROGRAM statement"  (but error above is fatal)
  17
  18 end
  19 ! { dg-excess-errors "compilation terminated" }