From: vbd Date: Thu, 8 Nov 2007 15:36:35 +0000 (+0000) Subject: replacing MPI_INTEGER with MPI_INT X-Git-Url: http://git.salome-platform.org/gitweb/?a=commitdiff_plain;h=f74ae4bac2ef0ed52e0d5cec65a6c47a540ce84d;p=tools%2Fmedcoupling.git replacing MPI_INTEGER with MPI_INT --- diff --git a/src/ParaMEDMEM/StructuredCoincidentDEC.cxx b/src/ParaMEDMEM/StructuredCoincidentDEC.cxx index f59b17e81..a175854d4 100644 --- a/src/ParaMEDMEM/StructuredCoincidentDEC.cxx +++ b/src/ParaMEDMEM/StructuredCoincidentDEC.cxx @@ -194,22 +194,22 @@ void StructuredCoincidentDEC::broadcastTopology(BlockTopology*& topo, int tag) for (int i=0; i< group->size(); i++) { if (i!= rank_master) - _comm_interface->send(&rank_master,1,MPI_INTEGER, i,tag+i,*(group->getComm())); + _comm_interface->send(&rank_master,1,MPI_INT, i,tag+i,*(group->getComm())); } } else { MESSAGE(" rank "<myRank()<< " waiting ..."); - _comm_interface->recv(&rank_master, 1,MPI_INTEGER, MPI_ANY_SOURCE, tag+group->myRank(), *(group->getComm()),&status); + _comm_interface->recv(&rank_master, 1,MPI_INT, MPI_ANY_SOURCE, tag+group->myRank(), *(group->getComm()),&status); MESSAGE(" rank "<myRank()<< "received master rank"<broadcast(&size, 1,MPI_INTEGER,rank_master,*(group->getComm())); + _comm_interface->broadcast(&size, 1,MPI_INT,rank_master,*(group->getComm())); int* buffer=new int[size]; if (topo!=0 && topo->getProcGroup()->myRank()==0) copy(serializer, serializer+size, buffer); - _comm_interface->broadcast(buffer,size,MPI_INTEGER,rank_master,*(group->getComm())); + _comm_interface->broadcast(buffer,size,MPI_INT,rank_master,*(group->getComm())); // Processors which did not possess the source topology // unserialize it