From 22a2bb83f52af7a7d75bbc5e029565c19b6d37b0 Mon Sep 17 00:00:00 2001 From: David A Minton Date: Wed, 13 Oct 2021 19:01:31 -0400 Subject: [PATCH] Fixed bad dealloc call that causes a crash when system particle types are not allocated --- src/util/util_dealloc.f90 | 5 ----- 1 file changed, 5 deletions(-) diff --git a/src/util/util_dealloc.f90 b/src/util/util_dealloc.f90 index 636a20317..bd648212e 100644 --- a/src/util/util_dealloc.f90 +++ b/src/util/util_dealloc.f90 @@ -72,11 +72,6 @@ module subroutine util_dealloc_system(self) ! Argument class(swiftest_nbody_system), intent(inout) :: self !! Swiftest nbody system object - call self%pl%dealloc() - call self%tp%dealloc() - call self%tp_discards%dealloc() - call self%pl_discards%dealloc() - if (allocated(self%cb)) deallocate(self%cb) if (allocated(self%pl)) deallocate(self%pl) if (allocated(self%tp)) deallocate(self%tp)