Set logger verbosity from string
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=*), | intent(in) | :: | level_str |
subroutine configure_log_level(level_str) !! Set logger verbosity from string character(len=*), intent(in) :: level_str select case (trim(level_str)) case ("debug") call logger%configure(debug_level) case ("verbose") call logger%configure(verbose_level) case ("info") call logger%configure(info_level) case ("performance") call logger%configure(performance_level) case ("warning") call logger%configure(warning_level) case ("error") call logger%configure(error_level) case default call logger%configure(info_level) end select end subroutine configure_log_level