[MOAB-dev] r1935 - MOAB/trunk/tools/mbcoupler

[tautges at mcs.anl.gov]

Author: tautges
Date: 2008-06-26 15:09:48 -0500 (Thu, 26 Jun 2008)
New Revision: 1935

Modified:
   MOAB/trunk/tools/mbcoupler/MBCoupler.cpp
   MOAB/trunk/tools/mbcoupler/mbcoupler_test.cpp
Log:
Removed a misplaced MPI_Finalize.

Corrected an off-by-one error.


Modified: MOAB/trunk/tools/mbcoupler/MBCoupler.cpp
===================================================================
--- MOAB/trunk/tools/mbcoupler/MBCoupler.cpp	2008-06-26 19:31:08 UTC (rev 1934)
+++ MOAB/trunk/tools/mbcoupler/MBCoupler.cpp	2008-06-26 20:09:48 UTC (rev 1935)
@@ -272,12 +272,12 @@
         // store in tuple source_pts
       tl->vi[3*tl->n] = from_proc;
       tl->vi[3*tl->n+1] = remote_index;
-      tl->vi[3*tl->n+2] = mappedPts->n;
+      tl->vi[3*tl->n+2] = mappedPts->n-1;
       tl->n++;
     }
     else {
       localMappedPts.push_back(index);
-      localMappedPts.push_back(mappedPts->n);
+      localMappedPts.push_back(mappedPts->n-1);
     }
   }
 

Modified: MOAB/trunk/tools/mbcoupler/mbcoupler_test.cpp
===================================================================
--- MOAB/trunk/tools/mbcoupler/mbcoupler_test.cpp	2008-06-26 19:31:08 UTC (rev 1934)
+++ MOAB/trunk/tools/mbcoupler/mbcoupler_test.cpp	2008-06-26 20:09:48 UTC (rev 1935)
@@ -249,8 +249,6 @@
   result = mbImpl->tag_get_handle(interp_tag.c_str(), tag); PRINT_LAST_ERROR;
   result = mbImpl->tag_set_data(tag, targ_verts, &field[0]); PRINT_LAST_ERROR;
 
-  int err = MPI_Finalize();
-  
     // done
   return MB_SUCCESS;
 }