to_integer_I2P Function

private elemental function to_integer_I2P(self, kind) result(to_number)

Arguments

Type IntentOptional AttributesName
class(string), intent(in) :: self

The string.

integer(kind=I2P), intent(in) :: kind

Mold parameter for kind detection.

Return Value integer(kind=I2P)

The number into the string.

Description

Cast string to integer (I2P).


Source Code

  elemental function to_integer_I2P(self, kind) result(to_number)
  !---------------------------------------------------------------------------------------------------------------------------------
  !< Cast string to integer (I2P).
  !---------------------------------------------------------------------------------------------------------------------------------
  class(string), intent(in) :: self      !< The string.
  integer(I2P),  intent(in) :: kind      !< Mold parameter for kind detection.
  integer(I2P)              :: to_number !< The number into the string.
  !---------------------------------------------------------------------------------------------------------------------------------

  !---------------------------------------------------------------------------------------------------------------------------------
  if (allocated(self%raw)) then
    if (self%is_integer()) read(self%raw, *) to_number
  endif
  return
  !---------------------------------------------------------------------------------------------------------------------------------
  endfunction to_integer_I2P