-// Copyright (C) 2007-2016 CEA/DEN, EDF R&D, OPEN CASCADE
+// Copyright (C) 2007-2024 CEA, EDF, OPEN CASCADE
//
// Copyright (C) 2003-2007 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
// CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
// See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
//
-// SALOME MPIContainer : implementation of container based on MPI libraries
-// File : MPIObject_i.cxx
-// Module : SALOME
-//
#include "MPIObject_i.hxx"
#include "utilities.h"
#include "Utils_SALOME_Exception.hxx"
+#include "Basics_MpiUtils.hxx"
#define TIMEOUT 5
for(unsigned int ip=0;ip<tior->length();ip++)
tior[ip] = (*_tior)[ip];
return tior._retn();
-};
+}
void MPIObject_i::tior(const Engines::IORTab& ior)
{
_srv[service] = false;
MPI_Barrier(MPI_COMM_WORLD);
-
- MPI_Errhandler_set(MPI_COMM_WORLD, MPI_ERRORS_RETURN);
+ MPI_ERROR_HANDLER(MPI_ERRORS_RETURN);
MPI_Info_create(&info);
MPI_Info_set(info, "ompi_unique", "true");
if( _numproc == 0 )
throw SALOME_Exception(msg.str().c_str());
}
}
- MPI_Errhandler_set(MPI_COMM_WORLD, MPI_ERRORS_ARE_FATAL);
+ MPI_ERROR_HANDLER(MPI_ERRORS_ARE_FATAL);
/* If rank 0 is server, all processes call MPI_Comm_accept */
/* If rank 0 is not server, all processes call MPI_Comm_connect */