crp/OpenMC
1
0
Fork 0
mirror of https://github.com/openmc-dev/openmc.git synced 2026-07-27 05:35:49 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions

Merge pull request #1335 from paulromano/openmpi-fix2

Browse source 
Better conditional for call to MPI_Type_free
This commit is contained in:
Amanda Lund 2019-09-11 16:17:20 -05:00 • committed by GitHub
commit 5968db8cdd
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
1 changed files with 1 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/finalize.cpp
View file

@ -127,9 +127,7 @@ int openmc_finalize()
// Free all MPI types
#ifdef OPENMC_MPI
int init_called;
MPI_Initialized(&init_called);
if (init_called) MPI_Type_free(&mpi::bank);
if (mpi::bank != MPI_DATATYPE_NULL) MPI_Type_free(&mpi::bank);
#endif
return 0;