迭代器
Get the next item from the stack_int_iterator
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(stack_int_iterator), | intent(inout) | :: | self | |||
integer, | intent(out) | :: | item |
Clear the stack_int_iterator
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(stack_int_iterator), | intent(inout) | :: | self |
type stack_int_iterator
private
type(node), pointer :: ptr => null()
contains
procedure :: next => stack_int_iterator_next
procedure :: clear => stack_int_iterator_clear
end type stack_int_iterator