Commit eb69611e authored by Kenneth Raffenetti's avatar Kenneth Raffenetti
Browse files

bug-fix: error macro for atomic datatype checking



The atomic datatype check macro is meant to use the datatype itself
to create an error string. This removes the unused "name" argument.

Fixes #1906
Signed-off-by: Pavan Balaji's avatarPavan Balaji <balaji@anl.gov>
parent caa70a87
......@@ -248,7 +248,7 @@ cvars:
} \
}
#define MPIR_ERRTEST_TYPE_RMA_ATOMIC(datatype_, name_, err_) \
#define MPIR_ERRTEST_TYPE_RMA_ATOMIC(datatype_, err_) \
do { \
if (!MPIR_Type_is_rma_atomic(datatype_)) { \
err_ = MPIR_Err_create_code(MPI_SUCCESS, \
......@@ -257,7 +257,7 @@ cvars:
MPI_ERR_TYPE, \
"**rmatypenotatomic", \
"**rmatypenotatomic %D", \
name_); \
datatype); \
goto fn_fail; \
} \
} while (0)
......
......@@ -119,7 +119,7 @@ int MPI_Compare_and_swap(const void *origin_addr, const void *compare_addr,
/* Check if datatype is a C integer, Fortran Integer,
logical, or byte, per the classes given on page 165. */
MPIR_ERRTEST_TYPE_RMA_ATOMIC(datatype, "datatype", mpi_errno);
MPIR_ERRTEST_TYPE_RMA_ATOMIC(datatype, mpi_errno);
if (win_ptr->create_flavor != MPI_WIN_FLAVOR_DYNAMIC)
MPIR_ERRTEST_DISP(target_disp, mpi_errno);
......
......@@ -85,7 +85,7 @@ int MPID_Compare_and_swap(const void *origin_addr, const void *compare_addr,
}
/* Check if datatype is a C integer, Fortran Integer,
logical, or byte, per the classes given on page 165. */
MPIR_ERRTEST_TYPE_RMA_ATOMIC(datatype, "datatype", mpi_errno);
MPIR_ERRTEST_TYPE_RMA_ATOMIC(datatype, mpi_errno);
req = (MPIDI_Win_request *) MPIU_Calloc0(1, MPIDI_Win_request);
req->win = win;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment