toml_get_int Subroutine

private subroutine toml_get_int(table, key, v)

Read a TOML integer value if present.

Arguments

Type IntentOptional Attributes Name
type(toml_table), intent(inout) :: table
character(len=*), intent(in) :: key
integer, intent(inout) :: v

Calls

proc~~toml_get_int~~CallsGraph proc~toml_get_int toml_get_int get_value get_value proc~toml_get_int->get_value

Called by

proc~~toml_get_int~~CalledByGraph proc~toml_get_int toml_get_int proc~apply_watch_from_manifest apply_watch_from_manifest proc~apply_watch_from_manifest->proc~toml_get_int proc~get_restart_defaults get_restart_defaults proc~get_restart_defaults->proc~toml_get_int proc~parse_cli parse_cli proc~parse_cli->proc~apply_watch_from_manifest proc~parse_restart_flags parse_restart_flags proc~parse_restart_flags->proc~get_restart_defaults proc~maybe_supervise maybe_supervise proc~maybe_supervise->proc~parse_restart_flags proc~parse_cli_config parse_cli_config proc~parse_cli_config->proc~parse_cli

Source Code

   subroutine toml_get_int(table, key, v)
      type(toml_table), intent(inout) :: table
      character(len=*), intent(in) :: key
      integer, intent(inout) :: v
      integer :: tmp, stat
      tmp = v
      call get_value(table, key, tmp, stat=stat)
      if (stat == toml_stat%success) v = tmp
   end subroutine toml_get_int