! { 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 "" } } |