X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/217ab9d5146bf370bbb20065fd357a5c099c78ee..f32336ba61cacec6b0bbd33b90e532f6678748fc:/src/smpi/include/smpi_op.hpp diff --git a/src/smpi/include/smpi_op.hpp b/src/smpi/include/smpi_op.hpp index 53541773e3..bae3055430 100644 --- a/src/smpi/include/smpi_op.hpp +++ b/src/smpi/include/smpi_op.hpp @@ -16,15 +16,19 @@ class Op : public F2C{ MPI_User_function* func_; bool is_commutative_; bool is_fortran_op_ = false; + int refcount_ = 1; + bool predefined_; public: - Op(MPI_User_function* function, bool commutative) : func_(function), is_commutative_(commutative) {} + Op(MPI_User_function* function, bool commutative, bool predefined=false) : func_(function), is_commutative_(commutative), predefined_(predefined) {} bool is_commutative() { return is_commutative_; } bool is_fortran_op() { return is_fortran_op_; } // tell that we were created from fortran, so we need to translate the type to fortran when called void set_fortran_op() { is_fortran_op_ = true; } - void apply(void* invec, void* inoutvec, int* len, MPI_Datatype datatype); + void apply(const void* invec, void* inoutvec, const int* len, MPI_Datatype datatype); static Op* f2c(int id); + void ref(); + static void unref(MPI_Op* op); }; }