1 files changed, 12 insertions, 0 deletions
diff --git a/lib/Expr/Expr.cpp b/lib/Expr/Expr.cpp
index 2b6f3d96..ce914266 100644
--- a/lib/Expr/Expr.cpp
+++ b/lib/Expr/Expr.cpp
@@ -353,6 +353,18 @@ ref<Expr>  NotOptimizedExpr::create(ref<Expr> src) {
   return NotOptimizedExpr::alloc(src);
 }
 
+/***/
+
+Array::~Array() {
+  // FIXME: This shouldn't be necessary.
+  if (array->stpInitialArray) {
+    ::vc_DeleteExpr(array->stpInitialArray);
+    array->stpInitialArray = 0;
+  }
+}
+
+/***/
+
 ref<Expr> ReadExpr::create(const UpdateList &ul, ref<Expr> index) {
   // rollback index when possible...