From 3b0d7530fb66ec6340dba8e923e0c7176a06e3a6 Mon Sep 17 00:00:00 2001
From: Erik Schnetter <schnetter@gmail.com>
Date: Tue, 6 Aug 2013 13:10:52 -0400
Subject: CarpetLib: Ensure oldstorage is empty in ggf destructor

---
 Carpet/CarpetLib/src/ggf.cc | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/Carpet/CarpetLib/src/ggf.cc b/Carpet/CarpetLib/src/ggf.cc
index 7ec02ff30..d9fde10df 100644
--- a/Carpet/CarpetLib/src/ggf.cc
+++ b/Carpet/CarpetLib/src/ggf.cc
@@ -62,6 +62,11 @@ ggf::ggf (const int varindex_, const operator_type transport_operator_,
 
 // Destructors
 ggf::~ggf () {
+  for (int ml=0; ml<(int)oldstorage.size(); ++ml) {
+    for (int rl=0; rl<(int)oldstorage.AT(ml).size(); ++rl) {
+      assert (oldstorage.AT(ml).AT(rl).empty());
+    }
+  }
   for (int rl=0; rl<h.reflevels(); ++rl) {
     recompose_free (rl);
   } // for rl
-- 
cgit v1.2.3