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)
PetscFinalize();
#endif
#if defined(HAVE_MPI)
if(level!=0) MPI_Abort(MPI_COMM_WORLD,level); // if abnormal exit on one cpu only
MPI_Finalize();
#endif
FinalizeOnelab();
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment