We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
2 parents 9123d92 + 74595fe commit 9538de4Copy full SHA for 9538de4
src/runtime-libraries/mpi/mpi_caf.c
@@ -1069,8 +1069,7 @@ finalize_internal(int status_code)
1069
dprint("MPI_Win_free(%p)\n", p);
1070
ierr = MPI_Win_free(p);
1071
chk_err(ierr);
1072
- ierr = MPI_Free_mem(cur_tok->token);
1073
- chk_err(ierr);
+ free(cur_tok->token);
1074
#else // GCC_GE_7
1075
1076
@@ -1117,9 +1116,13 @@ finalize_internal(int status_code)
1117
1116
}
1118
#endif
1119
+#ifdef HELPER
1120
pthread_mutex_lock(&lock_am);
1121
caf_is_finalized = 1;
1122
pthread_mutex_unlock(&lock_am);
1123
+#else
1124
+ caf_is_finalized = 1;
1125
+#endif
1126
free(sync_handles);
1127
dprint("Finalisation done!!!\n");
1128
0 commit comments