X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/12459ed00fdc525ec6e524555dfe80ce7737bab7..92ecb26f1bc9a12739d2c04b732099c1b23bc7ac:/src/smpi/include/private.hpp diff --git a/src/smpi/include/private.hpp b/src/smpi/include/private.hpp index c2bc1082d9..c9635c4f1b 100644 --- a/src/smpi/include/private.hpp +++ b/src/smpi/include/private.hpp @@ -515,12 +515,12 @@ XBT_PUBLIC smpi_trace_call_location_t* smpi_trace_get_call_location(); XBT_PRIVATE void private_execute_flops(double flops); - #define CHECK_ARGS(test, errcode, ...) \ if (test) { \ - if((errcode) != MPI_SUCCESS) \ + int error_code_ = (errcode); \ + if (error_code_ != MPI_SUCCESS) \ XBT_WARN(__VA_ARGS__); \ - return (errcode); \ + return error_code_; \ } #define CHECK_MPI_NULL(num, val, err, ptr) \