blob: 2c49b1c646d10178f54168fd78a25c4d17807ea2 [file] [log] [blame]
! { 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 "" } }