From e03cb3d121048b40eacfc23e91839402cae0e3d0 Mon Sep 17 00:00:00 2001
From: Tim O'Shea <tim.oshea753@gmail.com>
Date: Tue, 4 Jun 2013 17:55:22 -0400
Subject: blocks: fix for ~file_source crash, Bug #550

---
 gr-blocks/lib/file_source_impl.cc | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'gr-blocks/lib/file_source_impl.cc')

diff --git a/gr-blocks/lib/file_source_impl.cc b/gr-blocks/lib/file_source_impl.cc
index d413995549..941ca15c0e 100644
--- a/gr-blocks/lib/file_source_impl.cc
+++ b/gr-blocks/lib/file_source_impl.cc
@@ -71,7 +71,10 @@ namespace gr {
 
     file_source_impl::~file_source_impl()
     {
-      fclose ((FILE*)d_fp);
+      if(d_fp)
+        fclose ((FILE*)d_fp);
+      if(d_new_fp)
+        fclose ((FILE*)d_new_fp);
     }
     
     bool
-- 
cgit v1.2.3