Make sure energy-dependent multiplicities are deallocated. This memory leak was

introduced by #348.
This commit is contained in:
Paul Romano 2015-01-23 09:13:34 -05:00
parent 291b45a646
commit e8bc1e932b

View file

@ -336,8 +336,9 @@ module ace_header
class(Reaction), intent(inout) :: this ! The Reaction object to clear
if (allocated(this % sigma)) &
deallocate(this % sigma)
if (allocated(this % sigma)) deallocate(this % sigma)
if (associated(this % multiplicity_E)) deallocate(this % multiplicity_E)
if (associated(this % edist)) then
call this % edist % clear()