Ignore:
Timestamp:
12/06/17 15:22:17 (4 years ago)
Author:
yushan
Message:

unify type : MPI_Message MPI_Info

File:
1 edited

Legend:

Unmodified
Added
Removed
  • XIOS/dev/branch_openmp/extern/remap/src/mpi_routing.cpp

    r1328 r1362  
    152152        { 
    153153                #ifdef _usingEP 
    154                 MPI_Irecv(&sourceRank[i], 1, MPI_INT, -2, 0, communicator, &request[indexRequest]); 
     154                MPI_Irecv(&sourceRank[i], 1, MPI_INT, -2, 0, communicator, &request[indexRequest++]); 
    155155                #else 
    156                 MPI_Irecv(&sourceRank[i], 1, MPI_INT, MPI_ANY_SOURCE, 0, communicator, &request[indexRequest]); 
     156                MPI_Irecv(&sourceRank[i], 1, MPI_INT, MPI_ANY_SOURCE, 0, communicator, &request[indexRequest++]); 
    157157                #endif 
    158                 indexRequest++; 
    159         } 
    160         MPI_Barrier(communicator); 
    161         for (int i = 0; i < nbTarget; i++) 
    162         { 
    163                 MPI_Isend(&mpiRank, 1, MPI_INT, targetRank[i], 0, communicator, &request[indexRequest]); 
    164                 indexRequest++; 
     158        } 
     159        MPI_Barrier(communicator); 
     160        for (int i = 0; i < nbTarget; i++) 
     161        { 
     162                MPI_Isend(&mpiRank, 1, MPI_INT, targetRank[i], 0, communicator, &request[indexRequest++]); 
    165163        } 
    166164        MPI_Waitall(indexRequest, request, status); 
Note: See TracChangeset for help on using the changeset viewer.