fixes for parallel version running sequential

This commit is contained in:
Joachim Schöberl 2019-03-16 06:30:47 +01:00
parent bf59c1d490
commit 0197a3cca1
2 changed files with 3 additions and 3 deletions

View File

@ -62,7 +62,7 @@ namespace netgen
}
NgMPI_Comm Ngx_Mesh :: GetCommunicator() const
{ return Valid() ? mesh->GetCommunicator() : NgMPI_Comm(MPI_COMM_NULL); }
{ return Valid() ? mesh->GetCommunicator() : NgMPI_Comm{}; }
void Ngx_Mesh :: SaveMesh (ostream & ost) const
{

View File

@ -1217,7 +1217,7 @@ namespace netgen
mesh->SetMinimalH (mparam.minh);
}
#ifdef PARALLEL
#ifdef PARALLELGL
MyMPI_SendCmd ("bcastparthread");
MyMPI_Bcast (mparam.parthread, MPI_COMM_WORLD);
#endif
@ -2703,7 +2703,7 @@ void PlayAnimFile(const char* name, int speed, int maxcnt)
//cout << "stopped acis, outcome = " << res.ok() << endl;
#endif
#ifdef PARALLEL
#ifdef PARALLELGL
if (id == 0) MyMPI_SendCmd ("end");
MPI_Finalize();
#endif