dfa_state_node__deallocate Subroutine

private pure subroutine dfa_state_node__deallocate(self)

This subroutine deallocates the transition array of a DFA state node.

Type Bound

dfa_state_node_t

Arguments

Type	Intent	Optional	Attributes		Name
class(dfa_state_node_t),	intent(inout)			::	self

Source Code

   pure subroutine dfa_state_node__deallocate(self)
      implicit none
      class(dfa_state_node_t), intent(inout) :: self

      if (allocated(self%transition)) deallocate(self%transition)
   end subroutine dfa_state_node__deallocate