int namelen = 128;
int buf0[buf_size];
int buf1[buf_size];
- int i;
MPI_Status status;
MPI_Request req;
}
else if (rank == 0)
{
- memset (buf0, 0, buf_size);
+ memset (buf0, 0, buf_size*sizeof(int));
- MPI_Irecv (buf1, buf_size, MPI_INT,
+ MPI_Irecv (buf1, buf_size, MPI_INT,
MPI_ANY_SOURCE, 0, MPI_COMM_WORLD, &req);
printf("Proc 0: Request number - %p\n",req);
-
+
MPI_Send (buf0, buf_size, MPI_INT, 1, 0, MPI_COMM_WORLD);
MPI_Recv (buf0, buf_size, MPI_INT, 1, 0, MPI_COMM_WORLD, &status);
}
else if (rank == 1)
{
- memset (buf1, 1, buf_size);
+ memset (buf1, 1, buf_size*sizeof(int));
- MPI_Irecv (buf1, buf_size, MPI_INT,
+ MPI_Irecv (buf1, buf_size, MPI_INT,
MPI_ANY_SOURCE, 0, MPI_COMM_WORLD, &req);
printf("Proc 1: Request number - %p\n",req);