bigsim traces barrier call
authorGengbin Zheng <gzheng@illinois.edu>
Fri, 25 Aug 2006 19:01:44 +0000 (19:01 +0000)
committerGengbin Zheng <gzheng@illinois.edu>
Fri, 25 Aug 2006 19:01:44 +0000 (19:01 +0000)
src/libs/ck-libs/tcharm/tcharm.C

index dc4cd0a0aeafb464936bbf3f26f4ba83b90f5254..7a0b2de7dbdfe9af147f03af01f5a39da4e0e929 100644 (file)
@@ -493,7 +493,15 @@ void TCharm::barrier(void) {
        //Contribute to a synchronizing reduction
        CkCallback cb(index_t::atBarrier(0), thisProxy[0]);
        contribute(sizeof(vals),&vals,CkReduction::sum_int,cb);
+#if CMK_BLUEGENE_CHARM
+        void *curLog;          // store current log in timeline
+        _TRACE_BG_TLINE_END(&curLog);
+        TRACE_BG_AMPI_SUSPEND();
+#endif
        stop();
+#if CMK_BLUEGENE_CHARM
+        _TRACE_BG_BEGIN_EXECUTE_NOMSG("TCHARM_BARRIER_RESUME", &curLog);
+#endif
 }
 
 //Called when we've reached the barrier