From 43b96df2a4c229b1eeb72084fb78584a9fbf3e2f Mon Sep 17 00:00:00 2001 From: Mohamad Chaarawi Date: Fri, 22 Jan 2016 10:55:41 -0500 Subject: [svn-r28957] fix non-parallel bug. --- src/H5Pint.c | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/H5Pint.c b/src/H5Pint.c index e16379a..b3d1976 100644 --- a/src/H5Pint.c +++ b/src/H5Pint.c @@ -5453,7 +5453,6 @@ herr_t H5P_verify_apl_and_dxpl(hid_t *acspl_id, const H5P_libclass_t *libclass, hid_t *dxpl_id, hid_t loc_id, hbool_t is_collective) { - MPI_Comm mpi_comm; herr_t ret_value = SUCCEED; /* Return value */ FUNC_ENTER_NOAPI_NOINIT @@ -5479,6 +5478,8 @@ H5P_verify_apl_and_dxpl(hid_t *acspl_id, const H5P_libclass_t *libclass, happens only when the environment variable H5_COLL_BARRIER is set to non 0. */ if(is_collective && H5_coll_api_sanity_check_g) { + MPI_Comm mpi_comm; /* file communicator */ + /* retrieve the MPI communicator from the loc_id or the fapl_id */ if(H5F_mpi_retrieve_comm(loc_id, *acspl_id, &mpi_comm) < 0) HGOTO_ERROR(H5E_FILE, H5E_CANTGET, FAIL, "can't get MPI communicator") -- cgit v0.12