Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Remove unused file.
authorArnaud Giersch <arnaud.giersch@iut-bm.univ-fcomte.fr>
Fri, 12 Apr 2013 09:05:56 +0000 (11:05 +0200)
committerArnaud Giersch <arnaud.giersch@iut-bm.univ-fcomte.fr>
Fri, 12 Apr 2013 09:09:53 +0000 (11:09 +0200)
To finalize commit 386b9bb016d5acdc4929226fa4347a8f6d79bd21
"Remove mpi alltoall{,w}_pairwise (identical to ring)".

src/smpi/colls/alltoallv-pairwise.c [deleted file]

diff --git a/src/smpi/colls/alltoallv-pairwise.c b/src/smpi/colls/alltoallv-pairwise.c
deleted file mode 100644 (file)
index cc088b3..0000000
+++ /dev/null
@@ -1,30 +0,0 @@
-#include "colls_private.h"
-
-int smpi_coll_tuned_alltoallv_pairwise(void *sendbuf, int *sendcounts, int *senddisps,
-                                      MPI_Datatype sendtype, void *recvbuf,
-                                      int *recvcounts, int *recvdisps, MPI_Datatype recvtype,
-                                      MPI_Comm comm)
-{
-  int system_tag = 999;
-  int rank, size, step, sendto, recvfrom, sendsize, recvsize;
-
-  rank = smpi_comm_rank(comm);
-  size = smpi_comm_size(comm);
-  XBT_DEBUG("<%d> algorithm alltoallv_pairwise() called.", rank);
-  sendsize = smpi_datatype_size(sendtype);
-  recvsize = smpi_datatype_size(recvtype);
-  /* Perform pairwise exchange - starting from 1 so the local copy is last */
-  for (step = 1; step < size + 1; step++) {
-    /* who do we talk to in this step? */
-    sendto = (rank + step) % size;
-    recvfrom = (rank + size - step) % size;
-    /* send and receive */
-    smpi_mpi_sendrecv(&((char *) sendbuf)[senddisps[sendto] * sendsize],
-                      sendcounts[sendto], sendtype, sendto, system_tag,
-                      &((char *) recvbuf)[recvdisps[recvfrom] * recvsize],
-                      recvcounts[recvfrom], recvtype, recvfrom, system_tag, comm,
-                      MPI_STATUS_IGNORE);
-  }
-  return MPI_SUCCESS;
-}
-