Added missing MPI_Comm_free() call before MPI_Finalize()

This commit is contained in:
David Addison 2024-02-05 08:53:54 -08:00
parent 1292b25553
commit c6afef0b6f

View File

@ -1056,6 +1056,7 @@ testResult_t run() {
PRINT("# Avg bus bandwidth : %g %s\n", bw[0], check_avg_bw == -1 ? "" : (bw[0] < check_avg_bw*(0.9) ? "FAILED" : "OK"));
PRINT("#\n");
#ifdef MPI_SUPPORT
MPI_Comm_free(&mpi_comm);
MPI_Finalize();
#endif