summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--src/H5.c3
-rw-r--r--testpar/t_file_image.c3
2 files changed, 6 insertions, 0 deletions
diff --git a/src/H5.c b/src/H5.c
index 73e975a..2e05819 100644
--- a/src/H5.c
+++ b/src/H5.c
@@ -144,6 +144,9 @@ H5_init_library(void)
if(MPI_SUCCESS != (mpi_code = MPI_Comm_set_attr(MPI_COMM_SELF, key_val, NULL)))
HMPI_GOTO_ERROR(FAIL, "MPI_Comm_set_attr failed", mpi_code)
+
+ if(MPI_SUCCESS != (mpi_code = MPI_Comm_free_keyval(&key_val)))
+ HMPI_GOTO_ERROR(FAIL, "MPI_Comm_free_keyval failed", mpi_code)
}
}
#endif /*H5_HAVE_PARALLEL*/
diff --git a/testpar/t_file_image.c b/testpar/t_file_image.c
index 544ba32..96e65d5 100644
--- a/testpar/t_file_image.c
+++ b/testpar/t_file_image.c
@@ -240,6 +240,9 @@ file_image_daisy_chain_test(void)
if(vector_ptr[i] != i)
vector_ok = FALSE;
VRFY((vector_ok), "verified received vector.");
+
+ HDfree(vector_ptr);
+ vector_ptr = NULL;
/* 7) closes the core file and exit. */