_m
type(container_t) :: mailbox[*]
if (this_image() == 1) then
allocate(mailbox%stuff_(3))
mailbox%stuff_ = [1, 2, 3]
end if
sync all
print *, mailbox[1]%stuff()
end program
I am using OpenCoarrays 2.9.2 and gfortran 11.1.1.
Thanks everyone,
Harris Snyder
Hi everyone,
The following program produces incorrect results (GCC 11.2.0,
OpenCoarrays 2.9.2). The line marked `! NOTE` should print 1, 2, 3, 4,
but instead I get "OpenCoarrays internal error on image 2:
libcaf_mpi::caf_sendget_by_ref(): can not allocate 0 bytes of memory."
This may be an OpenCo
