From 4449cc42f2e57935cac23e54d2e6baad17f0aa31 Mon Sep 17 00:00:00 2001
From: Paul Romano <paul.k.romano@gmail.com>
Date: Thu, 24 Jun 2021 15:35:54 +0700
Subject: [PATCH] Make sure properties.h5 gets closed properly upon error

---
 src/summary.cpp | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/src/summary.cpp b/src/summary.cpp
index 62f51c94de..64d9a63629 100644
--- a/src/summary.cpp
+++ b/src/summary.cpp
@@ -204,6 +204,7 @@ extern "C" int openmc_properties_import(const char* filename)
   std::string filetype;
   read_attribute(file, "filetype", filetype);
   if (filetype != "properties") {
+    file_close(file);
     set_errmsg(fmt::format("File '{}' is not a properties file.", filename));
     return OPENMC_E_INVALID_ARGUMENT;
   }
@@ -213,6 +214,8 @@ extern "C" int openmc_properties_import(const char* filename)
   int32_t n;
   read_attribute(geom_group, "n_cells", n);
   if (n != openmc::model::cells.size()) {
+    close_group(geom_group);
+    file_close(file);
     set_errmsg(fmt::format("Number of cells in {} doesn't match current model.", filename));
     return OPENMC_E_GEOMETRY;
   }
@@ -229,6 +232,8 @@ extern "C" int openmc_properties_import(const char* filename)
   auto materials_group = open_group(file, "materials");
   read_attribute(materials_group, "n_materials", n);
   if (n != openmc::model::materials.size()) {
+    close_group(materials_group);
+    file_close(file);
     set_errmsg(fmt::format("Number of materials in {} doesn't match current model.", filename));
     return OPENMC_E_GEOMETRY;
   }