Destroy element.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(element_object), | intent(inout) | :: | self | element. |
pure subroutine destroy(self)
!< Destroy element.
class(element_object), intent(inout) :: self !< element.
if (allocated(self%string)) deallocate(self%string)
if (allocated(self%color_fg)) deallocate(self%color_fg)
if (allocated(self%color_bg)) deallocate(self%color_bg)
if (allocated(self%style)) deallocate(self%style)
endsubroutine destroy