- *ierr = MPI_Type_create_hindexed_block(*count, *blocklength, indices, simgrid::smpi::Datatype::f2c(*old_type), &tmp);
+ MPI_Aint* indices_aint=new MPI_Aint[*count];
+ for(int i=0; i<*count; i++)
+ indices_aint[i]=indices[i];
+ *ierr = MPI_Type_create_hindexed_block(*count, *blocklength, indices_aint, simgrid::smpi::Datatype::f2c(*old_type), &tmp);