finalize Subroutine

private elemental subroutine finalize(tag)

Arguments

Type	Intent	Optional	Attributes		Name
type(xml_tag),	intent(inout)			::	tag

Contents

Source Code

finalize

Source Code

  elemental subroutine finalize(tag)
  !< Free dynamic memory when finalizing.
  type(xml_tag), intent(inout) :: tag !< XML tag.

  call tag%free
  endsubroutine finalize