summaryrefslogtreecommitdiffstats
path: root/src/H5FDmpi.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/H5FDmpi.c')
-rw-r--r--src/H5FDmpi.c23
1 files changed, 12 insertions, 11 deletions
diff --git a/src/H5FDmpi.c b/src/H5FDmpi.c
index 21c761a..ff2c87d 100644
--- a/src/H5FDmpi.c
+++ b/src/H5FDmpi.c
@@ -59,7 +59,7 @@ H5FD_mpi_get_rank(const H5FD_t *file)
const H5FD_class_mpi_t *cls=(const H5FD_class_mpi_t *)(file->cls);
int ret_value;
- FUNC_ENTER_NOAPI(H5FD_mpi_get_rank, FAIL)
+ FUNC_ENTER_NOAPI(FAIL)
assert(file && cls);
assert(cls->get_rank); /* All MPI drivers must implement this */
@@ -95,7 +95,7 @@ H5FD_mpi_get_size(const H5FD_t *file)
const H5FD_class_mpi_t *cls=(const H5FD_class_mpi_t *)(file->cls);
int ret_value;
- FUNC_ENTER_NOAPI(H5FD_mpi_get_size, FAIL)
+ FUNC_ENTER_NOAPI(FAIL)
assert(file && cls);
assert(cls->get_size); /* All MPI drivers must implement this */
@@ -131,7 +131,7 @@ H5FD_mpi_get_comm(const H5FD_t *file)
const H5FD_class_mpi_t *cls=(const H5FD_class_mpi_t *)(file->cls);
MPI_Comm ret_value;
- FUNC_ENTER_NOAPI(H5FD_mpi_get_comm, MPI_COMM_NULL)
+ FUNC_ENTER_NOAPI(MPI_COMM_NULL)
assert(file && cls);
assert(cls->get_comm); /* All MPI drivers must implement this */
@@ -172,7 +172,7 @@ H5FD_mpi_MPIOff_to_haddr(MPI_Offset mpi_off)
{
haddr_t ret_value=HADDR_UNDEF;
- FUNC_ENTER_NOAPI_NOINIT_NOFUNC(H5FD_mpi_MPIOff_to_haddr)
+ FUNC_ENTER_NOAPI_NOINIT_NOERR
if (mpi_off != (MPI_Offset)(haddr_t)mpi_off)
ret_value=HADDR_UNDEF;
@@ -213,7 +213,7 @@ H5FD_mpi_haddr_to_MPIOff(haddr_t addr, MPI_Offset *mpi_off/*out*/)
{
herr_t ret_value=FAIL;
- FUNC_ENTER_NOAPI_NOINIT_NOFUNC(H5FD_mpi_haddr_to_MPIOff)
+ FUNC_ENTER_NOAPI_NOINIT_NOERR
assert(mpi_off);
@@ -257,7 +257,7 @@ H5FD_mpi_comm_info_dup(MPI_Comm comm, MPI_Info info, MPI_Comm *comm_new, MPI_Inf
MPI_Info info_dup=MPI_INFO_NULL;
int mpi_code;
- FUNC_ENTER_NOAPI(H5FD_mpi_comm_info_dup, FAIL)
+ FUNC_ENTER_NOAPI(FAIL)
/* Check arguments */
if (MPI_COMM_NULL == comm)
@@ -316,7 +316,8 @@ herr_t
H5FD_mpi_comm_info_free(MPI_Comm *comm, MPI_Info *info)
{
herr_t ret_value=SUCCEED;
- FUNC_ENTER_NOAPI(H5FD_mpi_comm_info_free, FAIL)
+
+ FUNC_ENTER_NOAPI(FAIL)
/* Check arguments */
if (!comm || !info)
@@ -368,7 +369,7 @@ H5FD_mpio_wait_for_left_neighbor(H5FD_t *_file)
int mpi_code; /* mpi return code */
herr_t ret_value=SUCCEED; /* Return value */
- FUNC_ENTER_NOAPI(H5FD_mpio_wait_for_left_neighbor, FAIL)
+ FUNC_ENTER_NOAPI(FAIL)
assert(file);
assert(H5FD_MPIO==file->pub.driver_id);
@@ -422,7 +423,7 @@ H5FD_mpio_signal_right_neighbor(H5FD_t *_file)
int mpi_code; /* mpi return code */
herr_t ret_value=SUCCEED; /* Return value */
- FUNC_ENTER_NOAPI(H5FD_mpio_signal_right_neighbor, FAIL)
+ FUNC_ENTER_NOAPI(FAIL)
assert(file);
assert(H5FD_MPIO==file->pub.driver_id);
@@ -470,7 +471,7 @@ H5FD_mpi_setup_collective(hid_t dxpl_id, MPI_Datatype btype, MPI_Datatype ftype)
H5P_genplist_t *plist; /* Property list pointer */
herr_t ret_value=SUCCEED; /* Return value */
- FUNC_ENTER_NOAPI(H5FD_mpi_setup_collective, FAIL)
+ FUNC_ENTER_NOAPI(FAIL)
/* Check arguments */
if(NULL == (plist = H5P_object_verify(dxpl_id,H5P_DATASET_XFER)))
@@ -510,7 +511,7 @@ H5FD_mpi_teardown_collective(hid_t dxpl_id)
H5P_genplist_t *plist; /* Property list pointer */
herr_t ret_value=SUCCEED; /* Return value */
- FUNC_ENTER_NOAPI(H5FD_mpi_teardown_collective, FAIL)
+ FUNC_ENTER_NOAPI(FAIL)
/* Check arguments */
if(NULL == (plist = H5P_object_verify(dxpl_id,H5P_DATASET_XFER)))