Free more memory in constraints cleanup

[alexxy/gromacs.git] / src / gromacs / mdlib / constr.cpp

diff --git a/src/gromacs/mdlib/constr.cpp b/src/gromacs/mdlib/constr.cpp
index 0a20f8baaf0941ce8a5ab94ffc72e4afcbab6393..8fb124001a9f622fc5e082cfafb550bf4197017d 100644 (file)
--- a/src/gromacs/mdlib/constr.cpp
+++ b/src/gromacs/mdlib/constr.cpp
@@ -1122,6 +1122,18 @@ Constraints::Impl::Impl(const gmx_mtop_t     &mtop_p,
 
 Constraints::Impl::~Impl()
 {
+    if (bSettleErrorHasOccurred != nullptr)
+    {
+        sfree(bSettleErrorHasOccurred);
+    }
+    if (vir_r_m_dr_th != nullptr)
+    {
+        sfree(vir_r_m_dr_th);
+    }
+    if (settled != nullptr)
+    {
+        settle_free(settled);
+    }
     done_lincs(lincsd);
 }