delete_content Subroutine

private pure subroutine delete_content(self)

Delete tag content.

Type Bound

xml_tag

Arguments

Type IntentOptional Attributes Name
class(xml_tag), intent(inout) :: self

XML tag.

Called by

proc~~delete_content~~CalledByGraph proc~delete_content xml_tag%delete_content program~foxy_test_delete_content foxy_test_delete_content program~foxy_test_delete_content->proc~delete_content

Source Code

   pure subroutine delete_content(self)
   !< Delete tag content.
   class(xml_tag), intent(inout) :: self !< XML tag.

   call self%tag_content%free
   endsubroutine delete_content