int main(int argc, char **argv)
{
int i, rank, size;
- MPI_Request *req;
+ MPI_Request *req=NULL;
MPI_Datatype newtype;
int snd_buf[3], rcv_buf[3];
int count = 2;
MPI_Waitall(NUM_LOOPS, req, MPI_STATUSES_IGNORE);
MPI_Barrier(MPI_COMM_WORLD);
+ free(req);
/* test issends */
MPI_Type_create_indexed_block(count, 1, displs, MPI_INT, &newtype);
MPI_Waitall(NUM_LOOPS, req, MPI_STATUSES_IGNORE);
MPI_Barrier(MPI_COMM_WORLD);
+ free(req);
/* test irsends */
MPI_Type_create_indexed_block(count, 1, displs, MPI_INT, &newtype);
MPI_Waitall(NUM_LOOPS, req, MPI_STATUSES_IGNORE);
MPI_Barrier(MPI_COMM_WORLD);
+ free(req);
+ free(displs);
MPI_Finalize();