void mpi_alltoallw_ ( void *sendbuf, int *sendcnts, int *sdispls, int* old_sendtypes, void *recvbuf, int *recvcnts,
int *rdispls, int* old_recvtypes, int* comm, int* ierr){
int size = simgrid::smpi::Comm::f2c(*comm)->size();
- MPI_Datatype* sendtypes = new MPI_Datatype[size];
- MPI_Datatype* recvtypes = new MPI_Datatype[size];
+ auto* sendtypes = new MPI_Datatype[size];
+ auto* recvtypes = new MPI_Datatype[size];
for(int i=0; i< size; i++){
if(FORT_IN_PLACE(sendbuf)!=MPI_IN_PLACE)
sendtypes[i] = simgrid::smpi::Datatype::f2c(old_sendtypes[i]);
int *rdispls, int* old_recvtypes, int* comm, int* request, int* ierr){
MPI_Request req;
int size = simgrid::smpi::Comm::f2c(*comm)->size();
- MPI_Datatype* sendtypes = new MPI_Datatype[size];
- MPI_Datatype* recvtypes = new MPI_Datatype[size];
+ auto* sendtypes = new MPI_Datatype[size];
+ auto* recvtypes = new MPI_Datatype[size];
for(int i=0; i< size; i++){
if(FORT_IN_PLACE(sendbuf)!=MPI_IN_PLACE)
sendtypes[i] = simgrid::smpi::Datatype::f2c(old_sendtypes[i]);