broadcast _Cmi_mynodesize in case (in rare situation) only rank 0 of mpi process... test_commit
authorGengbin Zheng <gzheng@illinois.edu>
Fri, 17 Aug 2012 18:18:37 +0000 (13:18 -0500)
committerGengbin Zheng <gzheng@illinois.edu>
Fri, 17 Aug 2012 18:18:37 +0000 (13:18 -0500)
src/arch/mpi/machine.c

index ec8d0eb9b5b5f46a507dc0ab3a5663564ec4dcfc..bec29d0e77b34e6b317f69d1a3f6ee491c2000c5 100644 (file)
@@ -1327,6 +1327,8 @@ static void MachineInitForMPI(int *argc, char ***argv, int *numNodes, int *myNod
                        MPI_Comm_rank(charmComm, myNodeID);
     }
 
+    MPI_Bcast(&_Cmi_mynodesize, 1, MPI_INT, 0, MPI_COMM_WORLD);
+
     myNID = *myNodeID;
 
     MPI_Get_version(&ver, &subver);