- for (i = 1; i < num_procs; i++)
- {
- src = dst = rank ^ i;
-
- MPI_Sendrecv(send_ptr + dst * send_chunk, send_count, send_type,
- dst, tag, recv_ptr + src * recv_chunk, recv_count,
- recv_type, src, tag, comm, &s);
+ smpi_mpi_sendrecv(send_ptr + dst * send_chunk, send_count, send_type,
+ dst, tag, recv_ptr + src * recv_chunk, recv_count,
+ recv_type, src, tag, comm, &s);