Implemented long variable names a la spss V12.

[pspp-builds.git] / src / file-handle.q

diff --git a/src/file-handle.q b/src/file-handle.q
index 5c48007912c84029b09e0973ef3575750b1746d1..3a688a7f5cf86f9d79f36ee2f7859d9acc05fa87 100644 (file)
--- a/src/file-handle.q
+++ b/src/file-handle.q
@@ -421,10 +421,11 @@ fh_init(void)
 void 
 fh_done(void)
 {
-  assert(handle_list);
-  
-  ll_destroy(handle_list);
-  handle_list = 0;
+  if ( handle_list )  
+  {
+    ll_destroy(handle_list);
+    handle_list = 0;
+  }
 }