mark MPI_Send into a separate event
authorGengbin Zheng <gzheng@illinois.edu>
Fri, 19 Jun 2009 04:02:40 +0000 (04:02 +0000)
committerGengbin Zheng <gzheng@illinois.edu>
Fri, 19 Jun 2009 04:02:40 +0000 (04:02 +0000)
src/libs/ck-libs/ampi/ampi.C

index e3595d339fde2e69efb2759e554e3bc93e70e7e4..a64683702515fcd24f7ac0b0866e948ffa6ed41d 100644 (file)
@@ -1801,9 +1801,17 @@ ampi::comlibsend(int t, int sRank, const void* buf, int count, int type,  int ra
 void
 ampi::send(int t, int sRank, const void* buf, int count, int type,  int rank, MPI_Comm destcomm, int sync)
 {
+#if CMK_TRACE_IN_CHARM
+   TRACE_BG_AMPI_BREAK(thread->getThread(), "AMPI_SEND", NULL, 0, 1);
+#endif
+
   const ampiCommStruct &dest=comm2CommStruct(destcomm);
   delesend(t,sRank,buf,count,type,rank,destcomm,dest.getProxy(),sync);
 
+#if CMK_TRACE_IN_CHARM
+   TRACE_BG_AMPI_BREAK(thread->getThread(), "AMPI_SEND_END", NULL, 0, 1);
+#endif
+
   if (sync) {
     // waiting for receiver side
     block();