! { dg-do compile } ! { dg-options "-fcoarray=single" } ! To be used by coarray_29_2.f90 ! PR fortran/55272 module co_sum_module implicit none contains subroutine co_sum(scalar) integer scalar[*] end subroutine end module ! DO NOT CLEAN UP THE MODULE FILE - coarray_29_2.f90 does it. ! { dg-final { keep-modules "" } }