- MPI_Irecv((char *)rbuf + inter_recv_offset, rcount, rtype, inter_src, tag,
- comm, &inter_rrequest);
- MPI_Isend((char *)rbuf + inter_send_offset, scount, stype, inter_dst, tag,
- comm, &inter_srequest_array[inter_srequest_count++]);
-
+ inter_rrequest = smpi_mpi_irecv((char *)rbuf + inter_recv_offset, rcount, rtype,
+ inter_src, tag, comm);
+ inter_srequest_array[inter_srequest_count++] = smpi_mpi_isend((char *)rbuf + inter_send_offset, scount, stype,
+ inter_dst, tag, comm);