make_repeat_node Function

public pure function make_repeat_node(min, max) result(node)

Arguments

Type IntentOptional Attributes Name
integer(kind=int32), intent(in) :: min
integer(kind=int32), intent(in) :: max

Return Value type(tree_node_t)


Source Code

    pure function make_repeat_node(min, max) result(node)
      implicit none
      integer(int32), intent(in) :: min, max
      type(tree_node_t) :: node

      node%op = op_repeat
      node%min_repeat = min
      node%max_repeat = max
   end function make_repeat_node