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

Last change on this file since 20498 was 20498, checked in by Mathieu Morlighem, 9 years ago

CHG: done with Archive/19101-20495

File size: 957 bytes
RevLine 
[20498]1Index: ../trunk-jpl/src/c/toolkits/mpi/issmmpi.cpp
2===================================================================
3--- ../trunk-jpl/src/c/toolkits/mpi/issmmpi.cpp (revision 20149)
4+++ ../trunk-jpl/src/c/toolkits/mpi/issmmpi.cpp (revision 20150)
5@@ -493,31 +493,6 @@
6 ensureContiguousLocations(aSize);
7 #endif
8 }/*}}}*/
9-int ISSM_MPI_Send(void *buf, int count, ISSM_MPI_Datatype datatype, int dest, int tag, ISSM_MPI_Comm comm){ /*{{{*/
10-
11- int rc=0;
12-#ifdef _HAVE_MPI_
13-# ifdef _HAVE_AMPI_
14- rc=AMPI_Send(buf,
15- count,
16- datatype,
17- dest,
18- tag,
19- AMPI_TO_RECV, // as long as there are no other variants
20- comm);
21-# else
22- rc=MPI_Send(buf,
23- count,
24- datatype,
25- dest,
26- tag,
27- comm);
28-# endif
29-#else
30-// nothing to be done here
31-#endif
32- return rc;
33-}/*}}}*/
34 int ISSM_MPI_Comm_split(ISSM_MPI_Comm comm, int color, int key, ISSM_MPI_Comm *newcomm){ /*{{{*/
35
36 int rc=0;
Note: See TracBrowser for help on using the repository browser.