This caused an invalid read in replay_multiple, as rank in comm !=index.

diff --git a/src/smpi/smpi_base.cpp b/src/smpi/smpi_base.cpp
index 703905f..5d12e00 100644 (file)
--- a/src/smpi/smpi_base.cpp
+++ b/src/smpi/smpi_base.cpp
@@ -1085,7 +1085,7 @@ void smpi_mpi_reduce_scatter(void *sendbuf, void *recvbuf, int *recvcounts, MPI_
 {
     int i, size, count;
     int *displs;
-    int rank = smpi_process_index();
+    int rank = smpi_comm_rank(comm);
     void *tmpbuf;
 
     /* arbitrarily choose root as rank 0 */