From 11c4ff7787f2d980fd527f3d8f804a8df27e3ddc Mon Sep 17 00:00:00 2001
From: Sharan Roongta <s.roongta@mpie.de>
Date: Wed, 22 Apr 2020 16:49:31 +0200
Subject: [PATCH] finalization error

---
 src/YAML_types.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/YAML_types.f90 b/src/YAML_types.f90
index 049029203..2edff3a58 100644
--- a/src/YAML_types.f90
+++ b/src/YAML_types.f90
@@ -984,7 +984,7 @@ recursive subroutine tList_finalize(self)
   current => self%first
   do while (associated(current))
    next => current%next
-   deallocate(current%node)
+   if(allocated(current%node)) deallocate(current%node)
    current => next
   end do
   nullify(self%first)