Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(string), | intent(in) | :: | self | The string. |
||
integer(kind=I1P), | intent(in) | :: | kind | Mold parameter for kind detection. |
The number into the string.
Cast string to integer (I1P).
elemental function to_integer_I1P(self, kind) result(to_number)
!---------------------------------------------------------------------------------------------------------------------------------
!< Cast string to integer (I1P).
!---------------------------------------------------------------------------------------------------------------------------------
class(string), intent(in) :: self !< The string.
integer(I1P), intent(in) :: kind !< Mold parameter for kind detection.
integer(I1P) :: 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_I1P