- MPI_Wait(&recv_request_array[i], &status);
- MPI_Isend((char *) buf + (i * increment), segment, datatype, to_left,
- tag + i, comm, &send_request_array[i]);
- MPI_Isend((char *) buf + (i * increment), segment, datatype, to_right,
- tag + i, comm, &send_request_array[i + pipe_length]);
+ smpi_mpi_wait(&recv_request_array[i], &status);
+ send_request_array[i] = smpi_mpi_isend((char *) buf + (i * increment), segment, datatype, to_left,
+ tag + i, comm);
+ send_request_array[i + pipe_length] = smpi_mpi_isend((char *) buf + (i * increment), segment, datatype, to_right,
+ tag + i, comm);