toml_get_real Subroutine

private subroutine toml_get_real(table, key, v)

Read a TOML real value if present.

Arguments

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

Calls

proc~~toml_get_real~~CallsGraph proc~toml_get_real toml_get_real get_value get_value proc~toml_get_real->get_value

Called by

proc~~toml_get_real~~CalledByGraph proc~toml_get_real toml_get_real proc~apply_watch_from_manifest apply_watch_from_manifest proc~apply_watch_from_manifest->proc~toml_get_real proc~get_restart_defaults get_restart_defaults proc~get_restart_defaults->proc~toml_get_real 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_real(table, key, v)
      type(toml_table), intent(inout) :: table
      character(len=*), intent(in) :: key
      real, intent(inout) :: v
      real :: tmp
      integer :: stat
      tmp = v
      call get_value(table, key, tmp, stat=stat)
      if (stat == toml_stat%success) v = tmp
   end subroutine toml_get_real