From 9307913c5bb584c7916c49e595915c1aa4c895db Mon Sep 17 00:00:00 2001
From: Dennis <65568528+zannads@users.noreply.github.com>
Date: Thu, 23 May 2024 10:24:29 +0300
Subject: [PATCH] Proposed Fix for Issue #789

See the comment on the Issue.
---
 src/hydraul.c | 1 +
 src/quality.c | 1 +
 2 files changed, 2 insertions(+)

diff --git a/src/hydraul.c b/src/hydraul.c
index 7d1718b0..36c746e0 100755
--- a/src/hydraul.c
+++ b/src/hydraul.c
@@ -286,6 +286,7 @@ void  closehyd(Project *pr)
 {
     freesparse(pr);
     freematrix(pr);
+    freeadjlists(pr);
 }
 
 
diff --git a/src/quality.c b/src/quality.c
index 41869fe5..2b8ccb6f 100644
--- a/src/quality.c
+++ b/src/quality.c
@@ -410,6 +410,7 @@ int closequal(Project *pr)
         FREE(qual->FlowDir);
         FREE(qual->SortedNodes);
     }
+    freeadjlists(pr);
     return errcode;
 }