Here is quick fix of OMPI timing facility. Currently first measurement is
bogus because OMPI_PROC_MY_NAME is not initialized at the time of first
ompistart setup:

*time from start to completion of rte_init 1348381643658244 usec*
time from completion of rte_init to modex 17585 usec
time to execute modex 313168 usec
time from modex to first barrier 6565 usec
time to execute barrier 124699 usec
time from barrier to complete mpi_init 74915 usec
time to execute barrier 41990 usec

-- 
С Уважением, Поляков Артем Юрьевич
Best regards, Artem Y. Polyakov
Index: ompi/runtime/ompi_mpi_init.c
===================================================================
--- ompi/runtime/ompi_mpi_init.c	(revision 31949)
+++ ompi/runtime/ompi_mpi_init.c	(working copy)
@@ -438,7 +438,8 @@
         mca_base_var_set_value(ret, allvalue, 4, MCA_BASE_VAR_SOURCE_DEFAULT, NULL);
     }
 
-    if (ompi_enable_timing && 0 == OMPI_PROC_MY_NAME->vpid) {
+    // At this moment OMPI_PROC_MY_NAME wasn't initialized yet.
+    if (ompi_enable_timing /*&& 0 == OMPI_PROC_MY_NAME->vpid*/) {
         gettimeofday(&ompistart, NULL);
     }
 

Reply via email to