This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
Re: problem with MPI call via a subroutine call
- From: Salvatore Filippone <salvatore dot filippone at uniroma2 dot it>
- To: Fortran at gcc dot gnu dot org
- Date: Mon, 18 Feb 2008 15:40:44 +0100
- Subject: Re: problem with MPI call via a subroutine call
- Reply-to: salvatore dot filippone at uniroma2 dot it
The original code contains:
call MPI_RECV(k(1),1,MPI_INTEGER,(cpuID-1),57, ! if receive I, it works
& MPI_COMM_WORLD,request,error)
which is wrong, as the next-to-last argument to MPI_RECV must be an array
STATUS(MPI_STATUS_SIZE) (per MPI 1.1 docs), and not a simple integer REQUEST.
Given that my MPICH build says MPI_STATUS_SIZE=4, it's an out-of-bounds
access problem in a buggy program
Hope this helps
Salvatore