MPI_Aint sendtype_extent = 0, recvtype_extent = 0;
int mpi_errno=MPI_SUCCESS;
int dst, rank;
MPI_Aint sendtype_extent = 0, recvtype_extent = 0;
int mpi_errno=MPI_SUCCESS;
int dst, rank;
/* FIXME: This should use the memory macros (there are storage
leaks here if there is an error, for example) */
/* FIXME: This should use the memory macros (there are storage
leaks here if there is an error, for example) */