[mpich2-commits] r3936 - mpich2/trunk/src/mpi/coll

[balaji at mcs.anl.gov]

Author: balaji
Date: 2009-03-04 15:47:25 -0600 (Wed, 04 Mar 2009)
New Revision: 3936

Modified:
   mpich2/trunk/src/mpi/coll/scatterv.c
Log:
Similar fix as gatherv which got copied into scatterv.

Modified: mpich2/trunk/src/mpi/coll/scatterv.c
===================================================================
--- mpich2/trunk/src/mpi/coll/scatterv.c	2009-03-04 21:43:51 UTC (rev 3935)
+++ mpich2/trunk/src/mpi/coll/scatterv.c	2009-03-04 21:47:25 UTC (rev 3936)
@@ -92,11 +92,12 @@
         reqs = 0;
         for (i = 0; i < comm_size; i++) {
             if (sendcnts[i]) {
-                if ((comm_ptr->comm_kind == MPID_INTRACOMM) && (i == rank) &&
-                    (sendbuf != MPI_IN_PLACE)) {
-                    mpi_errno = MPIR_Localcopy(((char *)sendbuf+displs[rank]*extent), 
-                                               sendcnts[rank], sendtype, 
-                                               recvbuf, recvcnt, recvtype);
+                if ((comm_ptr->comm_kind == MPID_INTRACOMM) && (i == rank)) {
+                    if (sendbuf != MPI_IN_PLACE) {
+                        mpi_errno = MPIR_Localcopy(((char *)sendbuf+displs[rank]*extent), 
+                                                   sendcnts[rank], sendtype, 
+                                                   recvbuf, recvcnt, recvtype);
+                    }
                 }
                 else {
                     mpi_errno = MPIC_Isend(((char *)sendbuf+displs[i]*extent),