MPI_Datatype tmp;
*ierr = MPI_Type_dup(simgrid::smpi::Datatype::f2c(*datatype), &tmp);
if(*ierr == MPI_SUCCESS) {
- *newdatatype = tmp->add_f();
+ *newdatatype = tmp->c2f();
}
}
MPI_Datatype tmp;
*ierr = MPI_Type_contiguous(*count, simgrid::smpi::Datatype::f2c(*old_type), &tmp);
if(*ierr == MPI_SUCCESS) {
- *newtype = tmp->add_f();
+ *newtype = tmp->c2f();
}
}
MPI_Datatype tmp;
*ierr= MPI_Type_vector(*count, *blocklen, *stride, simgrid::smpi::Datatype::f2c(*old_type), &tmp);
if(*ierr == MPI_SUCCESS) {
- *newtype = tmp->add_f();
+ *newtype = tmp->c2f();
}
}
MPI_Datatype tmp;
*ierr= MPI_Type_hvector (*count, *blocklen, *stride, simgrid::smpi::Datatype::f2c(*old_type), &tmp);
if(*ierr == MPI_SUCCESS) {
- *newtype = tmp->add_f();
+ *newtype = tmp->c2f();
}
}
MPI_Datatype tmp;
*ierr= MPI_Type_hvector(*count, *blocklen, *stride, simgrid::smpi::Datatype::f2c(*old_type), &tmp);
if(*ierr == MPI_SUCCESS) {
- *newtype = tmp->add_f();
+ *newtype = tmp->c2f();
}
}
indices_aint[i]=indices[i];
*ierr = MPI_Type_hindexed(*count, blocklens, indices_aint.data(), simgrid::smpi::Datatype::f2c(*old_type), &tmp);
if(*ierr == MPI_SUCCESS) {
- *newtype = tmp->add_f();
+ *newtype = tmp->c2f();
}
}
MPI_Datatype tmp;
*ierr = MPI_Type_create_hindexed(*count, blocklens, indices, simgrid::smpi::Datatype::f2c(*old_type), &tmp);
if(*ierr == MPI_SUCCESS) {
- *newtype = tmp->add_f();
+ *newtype = tmp->c2f();
}
}
MPI_Datatype tmp;
*ierr = MPI_Type_create_hindexed_block(*count, *blocklength, indices, simgrid::smpi::Datatype::f2c(*old_type), &tmp);
if(*ierr == MPI_SUCCESS) {
- *newtype = tmp->add_f();
+ *newtype = tmp->c2f();
}
}
MPI_Datatype tmp;
*ierr = MPI_Type_indexed(*count, blocklens, indices, simgrid::smpi::Datatype::f2c(*old_type), &tmp);
if(*ierr == MPI_SUCCESS) {
- *newtype = tmp->add_f();
+ *newtype = tmp->c2f();
}
}
MPI_Datatype tmp;
*ierr = MPI_Type_create_indexed(*count, blocklens, indices, simgrid::smpi::Datatype::f2c(*old_type), &tmp);
if(*ierr == MPI_SUCCESS) {
- *newtype = tmp->add_f();
+ *newtype = tmp->c2f();
}
}
MPI_Datatype tmp;
*ierr = MPI_Type_create_indexed_block(*count, *blocklength, indices, simgrid::smpi::Datatype::f2c(*old_type), &tmp);
if(*ierr == MPI_SUCCESS) {
- *newtype = tmp->add_f();
+ *newtype = tmp->c2f();
}
}
}
*ierr = MPI_Type_struct(*count, blocklens, indices_aint.data(), types.data(), &tmp);
if(*ierr == MPI_SUCCESS) {
- *newtype = tmp->add_f();
+ *newtype = tmp->c2f();
}
}
}
*ierr = MPI_Type_create_struct(*count, blocklens, indices, types.data(), &tmp);
if(*ierr == MPI_SUCCESS) {
- *newtype = tmp->add_f();
+ *newtype = tmp->c2f();
}
}
array_of_distribs, array_of_dargs, array_of_psizes,
*order, simgrid::smpi::Datatype::f2c(*oldtype), &tmp) ;
if(*ierr == MPI_SUCCESS) {
- *newtype = tmp->add_f();
+ *newtype = tmp->c2f();
}
}
MPI_Datatype tmp;
*ierr = MPI_Type_create_resized(simgrid::smpi::Datatype::f2c(*oldtype),*lb, *extent, &tmp);
if(*ierr == MPI_SUCCESS) {
- *newtype = tmp->add_f();
+ *newtype = tmp->c2f();
}
}
*ierr = MPI_Type_create_subarray(*ndims,array_of_sizes, array_of_subsizes, array_of_starts, *order,
simgrid::smpi::Datatype::f2c(*oldtype), &tmp);
if(*ierr == MPI_SUCCESS) {
- *newtype = tmp->add_f();
+ *newtype = tmp->c2f();
}
}