[mpich-commits] r10632 - mpich2/trunk/src/mpi/romio/adio/common
goodell at mcs.anl.gov
goodell at mcs.anl.gov
Tue Nov 20 16:20:52 CST 2012
Author: goodell
Date: 2012-11-20 16:20:51 -0600 (Tue, 20 Nov 2012)
New Revision: 10632
Modified:
mpich2/trunk/src/mpi/romio/adio/common/status_setb.c
Log:
ROMIO: fix overzealous MPICH2->MPICH change
Partially reviewed by robl@ & balaji at .
Modified: mpich2/trunk/src/mpi/romio/adio/common/status_setb.c
===================================================================
--- mpich2/trunk/src/mpi/romio/adio/common/status_setb.c 2012-11-20 22:14:18 UTC (rev 10631)
+++ mpich2/trunk/src/mpi/romio/adio/common/status_setb.c 2012-11-20 22:20:51 UTC (rev 10632)
@@ -8,7 +8,7 @@
#include "adio.h"
#include "mpi.h"
-#if defined(MPICH)
+#if defined(MPICH2) || (defined(MPICH) && (MPICH_NAME >= 3))
/* Not quite correct, but much closer for MPI2 */
/* TODO: still needs to handle partial datatypes and situations where the mpi
* implementation fills status with something other than bytes (globus2 might
@@ -23,20 +23,6 @@
MPI_Status_set_elements(status, MPI_BYTE, nbytes);
return MPI_SUCCESS;
}
-#elif defined(MPICH)
-
-void MPID_Status_set_bytes(MPI_Status *status, int nbytes);
-int MPIR_Status_set_bytes(MPI_Status *status, MPI_Datatype datatype,
- int nbytes);
-
-int MPIR_Status_set_bytes(MPI_Status *status, MPI_Datatype datatype,
- int nbytes)
-{
- if (status != MPI_STATUS_IGNORE)
- MPID_Status_set_bytes(status, nbytes);
- return MPI_SUCCESS;
-}
-
#elif defined(MPILAM) || defined(MPISGI)
int MPIR_Status_set_bytes(MPI_Status *status, MPI_Datatype datatype,
int nbytes)
More information about the commits
mailing list