X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/a900ac9d39fee1b3de240499c5326e5b8d4f44c2..6ed77a67294930d5eda78114ef756c269bfde38f:/src/smpi/mpi/smpi_op.cpp diff --git a/src/smpi/mpi/smpi_op.cpp b/src/smpi/mpi/smpi_op.cpp index 0cc66590c4..b7109298e8 100644 --- a/src/smpi/mpi/smpi_op.cpp +++ b/src/smpi/mpi/smpi_op.cpp @@ -77,8 +77,8 @@ APPLY_OP_LOOP(MPI_DOUBLE, double,op)\ APPLY_OP_LOOP(MPI_LONG_DOUBLE, long double,op)\ APPLY_OP_LOOP(MPI_REAL, float,op)\ APPLY_OP_LOOP(MPI_REAL4, float,op)\ -APPLY_OP_LOOP(MPI_REAL8, float,op)\ -APPLY_OP_LOOP(MPI_REAL16, double,op) +APPLY_OP_LOOP(MPI_REAL8, double,op)\ +APPLY_OP_LOOP(MPI_REAL16, long double,op) #define APPLY_COMPLEX_OP_LOOP(op)\ APPLY_OP_LOOP(MPI_C_FLOAT_COMPLEX, float _Complex,op)\ @@ -240,7 +240,7 @@ void Op::set_fortran_op() void Op::apply(void *invec, void *inoutvec, int *len, MPI_Datatype datatype) { - if (smpi_privatize_global_variables == SmpiPrivStrategies::Mmap) { + if (smpi_privatize_global_variables == SmpiPrivStrategies::MMAP) { // we need to switch as the called function may silently touch global variables XBT_DEBUG("Applying operation, switch to the right data frame "); smpi_switch_data_segment(simgrid::s4u::Actor::self());