From 2ac63853ba5a836a5e4477bad0c1c56f0fa1dfa8 Mon Sep 17 00:00:00 2001
From: Pjotr Prins
Date: Thu, 6 Sep 2018 13:37:55 +0000
Subject: Show warning on some unused matrices

---
 src/gemma.cpp | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'src/gemma.cpp')

diff --git a/src/gemma.cpp b/src/gemma.cpp
index f928977..c3caa96 100644
--- a/src/gemma.cpp
+++ b/src/gemma.cpp
@@ -2837,14 +2837,14 @@ void GEMMA::BatchRun(PARAM &cPar) {
     // release all matrices and vectors
     gsl_matrix_safe_free(Y);
     gsl_matrix_safe_free(W);
-    gsl_matrix_safe_free(B);
-    gsl_matrix_safe_free(se_B);
-    gsl_matrix_safe_free(G);
+    gsl_matrix_warn_free(B); // sometimes unused
+    gsl_matrix_warn_free(se_B);
+    gsl_matrix_warn_free(G);
     gsl_matrix_safe_free(U);
     gsl_matrix_safe_free(UtW);
     gsl_matrix_safe_free(UtY);
     gsl_vector_safe_free(eval);
-    gsl_vector_safe_free(env);
+    gsl_vector_free(env); // sometimes unused
   }
 
   // BSLMM
-- 
cgit v1.2.3