log_debug Subroutine

public subroutine log_debug(w, msg)

Log a debug message (prints only when debug is enabled).

Arguments

Type IntentOptional Attributes Name
type(watch_opts_t), intent(in) :: w
character(len=*), intent(in) :: msg

Calls

proc~~log_debug~~CallsGraph proc~log_debug log_debug colorize colorize proc~log_debug->colorize

Source Code

   subroutine log_debug(w, msg)
      type(watch_opts_t), intent(in) :: w
      character(len=*), intent(in)   :: msg
      if (.not. w%debug) return
      write(output_unit,'(a)') &
         colorize("debug      |", color_fg='magenta_intense', style='bold_on') // "  " // trim(msg)
   end subroutine log_debug