parse Subroutine

  1. finer_option_t.F90
  2. finer_option_t
  3. parse

private elemental subroutine parse(self, sep, source, error)

Parse option data from a source string.

Arguments

TypeIntentOptionalAttributesName
class(option), intent(inout) :: self

Option data.
character, intent(in) :: sep

Separator of option name/value.
type(string), intent(inout) :: source

String containing option data.
integer(kind=I4P), intent(out) :: error

Error code.

Contents

Source Code

parse

Source Code

  elemental subroutine parse(self, sep, source, error)
  !< Parse option data from a source string.
  class(option), intent(inout) :: self   !< Option data.
  character(*),  intent(in)    :: sep    !< Separator of option name/value.
  type(string),  intent(inout) :: source !< String containing option data.
  integer(I4P),  intent(out)   :: error  !< Error code.

  error = ERR_OPTION
  if (scan(adjustl(source), comments) == 1) return
  call self%parse_name(sep=sep, source=source, error=error)
  call self%parse_value(sep=sep, source=source, error=error)
  call self%parse_comment
  endsubroutine parse