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;
 }