vec_dp_reserve Subroutine

private pure subroutine vec_dp_reserve(self, n, err)

Make room for at least n elements. size() is unchanged.

Type Bound

vector_dp_t

Arguments

Type IntentOptional Attributes Name
class(vector_dp_t), intent(inout) :: self
integer(kind=default_int), intent(in) :: n
type(error_t), intent(inout), optional :: err

Calls

proc~~vec_dp_reserve~~CallsGraph proc~vec_dp_reserve vector_dp_t%vec_dp_reserve proc~vec_dp_grow vec_dp_grow proc~vec_dp_reserve->proc~vec_dp_grow proc~error_raise error_raise proc~vec_dp_grow->proc~error_raise proc~vec_dp_capacity vector_dp_t%vec_dp_capacity proc~vec_dp_grow->proc~vec_dp_capacity proc~error_set error_t%error_set proc~error_raise->proc~error_set

Source Code

   pure subroutine vec_dp_reserve(self, n, err)
      !! Make room for at least `n` elements. `size()` is unchanged.
      class(vector_dp_t), intent(inout) :: self
      integer(default_int), intent(in) :: n
      type(error_t), intent(inout), optional :: err

      if (n <= 0) return
      call vec_dp_grow(self, n, err)
   end subroutine vec_dp_reserve