[MOAB-dev] r4345 - MOAB/trunk/src/parallel

[kraftche at cae.wisc.edu]

Author: kraftche
Date: 2010-12-09 14:25:08 -0600 (Thu, 09 Dec 2010)
New Revision: 4345

Modified:
   MOAB/trunk/src/parallel/WriteHDF5Parallel.cpp
Log:
add more debug output to WriteHDF5Parallel

Modified: MOAB/trunk/src/parallel/WriteHDF5Parallel.cpp
===================================================================
--- MOAB/trunk/src/parallel/WriteHDF5Parallel.cpp	2010-12-09 20:24:52 UTC (rev 4344)
+++ MOAB/trunk/src/parallel/WriteHDF5Parallel.cpp	2010-12-09 20:25:08 UTC (rev 4345)
@@ -356,11 +356,13 @@
   
   dbgOut.set_rank( myPcomm->proc_config().proc_rank() );
 
+  debug_barrier();
   dbgOut.tprint(1,"Gathering interface meshes\n");
   rval = gather_interface_meshes();
   if (MB_SUCCESS != rval) return error(rval);
 
     /**************** get tag names for sets likely to be shared ***********/
+  debug_barrier();
   dbgOut.tprint(1,"Getting shared entity sets\n");
   rval = get_sharedset_tags();
   if (MB_SUCCESS != rval) return error(rval);
@@ -368,8 +370,11 @@
 
     /**************** Create actual file and write meta info ***************/
 
+  debug_barrier();
   if (myPcomm->proc_config().proc_rank() == 0)
   {
+    dbgOut.tprintf(1,"Creating file: %s\n",filename);
+    
       // create the file
     const char* type_names[MBMAXTYPE];
     memset( type_names, 0, MBMAXTYPE * sizeof(char*) );
@@ -391,13 +396,14 @@
   
   
      /**************** Create node coordinate table ***************/
- 
+  debug_barrier();
   dbgOut.tprint(1,"creating node table\n");
   rval = create_node_table( dimension );
   if (MB_SUCCESS != rval) return error(rval);
   
     /**************** Create element tables ***************/
 
+  debug_barrier();
   dbgOut.tprint(1,"negotiating element types\n");
   rval = negotiate_type_list();
   if (MB_SUCCESS != rval) return error(rval);
@@ -408,6 +414,7 @@
   
     /*************** Exchange file IDs *****************/
 
+  debug_barrier();