collections_mod::c_next_mapentry Interface Reference

Private Member Functions
type(mapentry_type) function	iterator_get_next_mapentry (iterator)
	Returns the next mapentry referenced by the iterator and advanced it, or an error if it has reached the end of iteration or the next item was not a mapentry. More...

Detailed Description

Definition at line 606 of file collections.F90.

Member Function/Subroutine Documentation

iterator_get_next_mapentry()

type(mapentry_type) function collections_mod::c_next_mapentry::iterator_get_next_mapentry ( type(iterator_type), intent(inout)  iterator )

private

Returns the next mapentry referenced by the iterator and advanced it, or an error if it has reached the end of iteration or the next item was not a mapentry.

Parameters

iterator

The iterator of which to access and advance the next element

Returns

The next map entry

Definition at line 3272 of file collections.F90.

    type(iterator_type), intent(inout) :: iterator
    type(mapentry_type) :: iterator_get_next_mapentry

    class(*), pointer :: generic

    generic=>iterator_get_next_generic(iterator)
    if (associated(generic)) then
      select type(generic)
        type is (mapnode_type)
          iterator_get_next_mapentry%key=generic%key
          iterator_get_next_mapentry%value=>generic%value
        class default
          call log_log(log_error, "Next item in iterator is not a map entry")
      end select
    else
      call log_log(log_error, "Can not get next map entry in iterator as iterator has reached end of collection")
    end if

---

The documentation for this interface was generated from the following file:

• /nfs/a277/earlcd/dev/monc/svn-git/monc/model_core/src/utils/collections.F90