SLICE: Fix order of file close and mpi_finalize

tokusanya · Jul 16, 2024 · 94a3d95 · 94a3d95
1 parent ea75dd9
commit 94a3d95
Showing 1 changed file with 4 additions and 5 deletions.
diff --git a/packages/seacas/applications/slice/Slice.C b/packages/seacas/applications/slice/Slice.C
@@ -387,12 +387,11 @@ int main(int argc, char *argv[])
   dbi->set_surface_split_type(Ioss::SPLIT_BY_DONT_SPLIT);
   dbi->set_field_separator(0);
 
-  // NOTE: 'region' owns 'db' pointer at this time...
-  Ioss::Region region(dbi, "region_1");
-
-  region.output_summary(std::cerr, true);
-
   try {
+    // NOTE: 'region' owns 'db' pointer at this time...
+    Ioss::Region region(dbi, "region_1");
+    region.output_summary(std::cerr, true);
+
     if (dbi->int_byte_size_api() == 4) {
       progress("4-byte slice");
       slice(region, nem_file, interFace, 1);