From 2e1f48ba900e97e906d18d8c5568b31dfbde3412 Mon Sep 17 00:00:00 2001
From: Pjotr Prins
Date: Mon, 11 Jan 2021 08:56:22 +0000
Subject: Only free randomizer when initialized

Fixes: #239
---
 src/param.cpp | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'src/param.cpp')

diff --git a/src/param.cpp b/src/param.cpp
index c5f60c6..f96e9c3 100644
--- a/src/param.cpp
+++ b/src/param.cpp
@@ -107,7 +107,8 @@ PARAM::PARAM(void)
       time_UtZ(0.0), time_opt(0.0), time_Omega(0.0) {}
 
 PARAM::~PARAM() {
-  gsl_rng_free(gsl_r);
+  if (gsl_r)
+    gsl_rng_free(gsl_r);
 }
 
 // Read files: obtain ns_total, ng_total, ns_test, ni_test.
-- 
cgit v1.2.3