Skip to content
Snippets Groups Projects
Commit 40e89981 authored by Gauthier Becker's avatar Gauthier Becker
Browse files

Fix fatal mpi_abort

Fix bug for CG in MPI
parent 44d20c00
No related branches found
No related tags found
No related merge requests found
...@@ -112,6 +112,7 @@ void Msg::Exit(int level) ...@@ -112,6 +112,7 @@ void Msg::Exit(int level)
PetscFinalize(); PetscFinalize();
#endif #endif
#if defined(HAVE_MPI) #if defined(HAVE_MPI)
if(level!=0) MPI_Abort(MPI_COMM_WORLD,level); // if abnormal exit on one cpu only
MPI_Finalize(); MPI_Finalize();
#endif #endif
FinalizeOnelab(); FinalizeOnelab();
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment