vec_string_capacity Function

private pure function vec_string_capacity(self) result(n)

Elements that fit before the next reallocation.

Type Bound

vector_string_t

Arguments

Type IntentOptional Attributes Name
class(vector_string_t), intent(in) :: self

Return Value integer(kind=default_int)


Called by

proc~~vec_string_capacity~~CalledByGraph proc~vec_string_capacity vector_string_t%vec_string_capacity proc~vec_string_append vector_string_t%vec_string_append proc~vec_string_append->proc~vec_string_capacity proc~vec_string_grow vec_string_grow proc~vec_string_append->proc~vec_string_grow proc~vec_string_grow->proc~vec_string_capacity proc~vec_string_push_back vector_string_t%vec_string_push_back proc~vec_string_push_back->proc~vec_string_capacity proc~vec_string_push_back->proc~vec_string_grow proc~vec_string_resize vector_string_t%vec_string_resize proc~vec_string_resize->proc~vec_string_capacity proc~vec_string_resize->proc~vec_string_grow proc~vec_string_shrink_to_fit vector_string_t%vec_string_shrink_to_fit proc~vec_string_shrink_to_fit->proc~vec_string_capacity proc~vec_string_take vector_string_t%vec_string_take proc~vec_string_take->proc~vec_string_capacity proc~vec_string_take->proc~vec_string_shrink_to_fit proc~vec_string_reserve vector_string_t%vec_string_reserve proc~vec_string_reserve->proc~vec_string_grow

Source Code

   pure function vec_string_capacity(self) result(n)
      !! Elements that fit before the next reallocation.
      class(vector_string_t), intent(in) :: self
      integer(default_int) :: n

      if (allocated(self%items)) then
         n = size(self%items, kind=default_int)
      else
         n = 0
      end if
   end function vec_string_capacity