gcc/testsuite/gfortran.dg/coarray_collectives_3.f90

   1 ! { dg-do compile }
   2 !
   3 ! CO_SUM/CO_MIN/CO_MAX
   4 !
   5 program test
   6   implicit none
   7   intrinsic co_max
   8   integer :: val
   9   call co_max(val) ! { dg-error "Coarrays disabled at .1., use '-fcoarray=' to enable" }
  10 end program test
  11 ! { dg-excess-errors "compilation terminated" }