source: issm/oecreview/Archive/19101-20495/ISSM-20149-20150.diff@ 20498

../trunk-jpl/src/c/toolkits/mpi/issmmpi.cpp

@@ -493 +493 @@
   ensureContiguousLocations(aSize);
 #endif
 }/*}}}*/
-int ISSM_MPI_Send(void *buf, int count, ISSM_MPI_Datatype datatype, int dest, int tag, ISSM_MPI_Comm comm){ /*{{{*/
-
-  int rc=0;
-#ifdef _HAVE_MPI_
-# ifdef _HAVE_AMPI_
-  rc=AMPI_Send(buf, 
-               count,
-               datatype,
-               dest,
-               tag,
-               AMPI_TO_RECV, // as long as there are no other variants
-               comm);
-# else
-  rc=MPI_Send(buf, 
-              count,
-              datatype,
-              dest,
-              tag,
-              comm);
-# endif
-#else 
-// nothing to be done here 
-#endif
-  return rc;
-}/*}}}*/
 int ISSM_MPI_Comm_split(ISSM_MPI_Comm comm, int color, int key, ISSM_MPI_Comm *newcomm){ /*{{{*/
 
 int rc=0;