-/* Copyright (c) 2013-2017. The SimGrid Team.
+/* Copyright (c) 2013-2019. The SimGrid Team.
* All rights reserved. */
/* This program is free software; you can redistribute it and/or modify it
namespace simgrid{
namespace smpi{
-
-// Allgather-Non-Topoloty-Scecific-Logical-Ring algorithm
+// Allgather-Non-Topology-Specific-Logical-Ring algorithm
int
-Coll_allgather_NTSLR_NB::allgather(void *sbuf, int scount, MPI_Datatype stype,
+Coll_allgather_NTSLR_NB::allgather(const void *sbuf, int scount, MPI_Datatype stype,
void *rbuf, int rcount, MPI_Datatype rtype,
MPI_Comm comm)
{
size = comm->size();
rextent = rtype->get_extent();
sextent = stype->get_extent();
- MPI_Request *rrequest_array;
- MPI_Request *srequest_array;
- rrequest_array = (MPI_Request *) xbt_malloc(size * sizeof(MPI_Request));
- srequest_array = (MPI_Request *) xbt_malloc(size * sizeof(MPI_Request));
+ MPI_Request* rrequest_array = new MPI_Request[size];
+ MPI_Request* srequest_array = new MPI_Request[size];
// irregular case use default MPI fucntions
if (scount * sextent != rcount * rextent) {
Request::wait(&srequest_array[i], &status2);
}
- free(rrequest_array);
- free(srequest_array);
+ delete[] rrequest_array;
+ delete[] srequest_array;
return MPI_SUCCESS;
}