45 |
|
strcpy( c_in_name, in_name); |
46 |
|
#ifdef IS_MPI |
47 |
|
} |
48 |
< |
strcpy( checkPointMsg, "Infile opened for reading successfully." ); |
48 |
> |
else{ |
49 |
> |
sprintf( c_in_name, "mpiNodeParser_%d", worldRank ); |
50 |
> |
} |
51 |
> |
|
52 |
> |
strcpy( checkPointMsg, "Infile opened for reading successfully." ); |
53 |
|
MPIcheckPoint(); |
54 |
|
#endif |
55 |
|
return; |
265 |
|
} |
266 |
|
} |
267 |
|
myStatus = -1; |
268 |
< |
for (j = 0; j < mpiSim->getNumberProcessors(); j++) { |
268 |
> |
for (j = 1; j < mpiSim->getNumberProcessors(); j++) { |
269 |
|
MPI_Send( &myStatus, 1, MPI_INT, j, |
270 |
|
TAKE_THIS_TAG_INT, MPI_COMM_WORLD); |
271 |
|
} |