iterator_has_next Function

  1. utf8-f_detail.f90
  2. utf8_detail
  3. iterator_has_next

public pure function iterator_has_next(this) result(r)

iterator methods

Arguments

TypeIntentOptionalAttributesName
class(utf8_string_iterator), intent(in) :: this

Return Value logical


Contents

Source Code

iterator_has_next

Source Code

    pure function iterator_has_next(this) result(r)
        class(utf8_string_iterator), intent(in) :: this
        logical :: r

        r = this%cur <= len(this%ptr)

    end function iterator_has_next