Don't free a LuaTree if it doesn't exist.

1 files changed, 11 insertions, 8 deletions

diff --git a/src/sledjchisl/sledjchisl.c b/src/sledjchisl/sledjchisl.c
index 8939e2b..23f47a1 100644
--- a/src/sledjchisl/sledjchisl.c
+++ b/src/sledjchisl/sledjchisl.c
@@ -957,17 +957,20 @@ void freeLuaTree(qtreetbl_t *tree)
 {
   qtreetbl_obj_t obj0;
 
-  memset((void*)&obj0, 0, sizeof(obj0)); // must be cleared before call
-  tree->lock(tree);  // lock it when thread condition is expected
-  while(tree->getnext(tree, &obj0, false) == true)
+  if(tree)
   {
-    qLua *q0 = obj0.data;
+    memset((void*)&obj0, 0, sizeof(obj0)); // must be cleared before call
+    tree->lock(tree);  // lock it when thread condition is expected
+    while(tree->getnext(tree, &obj0, false) == true)
+    {
+      qLua *q0 = obj0.data;
 
-    if (LUA_TTABLE == q0->type)
-      freeLuaTree(q0->v.t);
+      if (LUA_TTABLE == q0->type)
+        freeLuaTree(q0->v.t);
+    }
+    tree->unlock(tree);
+    tree->free(tree);
   }
-  tree->unlock(tree);
-  tree->free(tree);
 }