dc_args::debug Interface Reference

Public Member Functions
subroutine	dcargsdebug0 (arg)

Detailed Description

Definition at line 342 of file dc_args.f90.

Member Function/Subroutine Documentation

dcargsdebug0()

subroutine dc_args::debug::dcargsdebug0

(

type(args), intent(inout)

arg

)

Auto-configure debug option

Performs automatic configuration of the debug option.

When -D or –debug is specified, automatically calls dc_trace::SetDebug to configure arg.

Parameters

[in,out]

arg

ARGS derived type variable

Definition at line 667 of file dc_args.f90.

    use dc_types, only: string
    use dc_string, only: stoa, stoi
    use dc_trace, only: setdebug
    use dc_message, only: messagenotify
    implicit none
    type(ARGS), intent(inout) :: arg
    logical :: OPT_debug
    character(STRING) :: VAL_debug
    character(len = *), parameter  :: subname = 'DCArgsDebug'
  continue
    if (.not. arg % initialized) then
      call messagenotify('W', subname, 'Call Open before Debug in dc_args.')
      call dcargsopen(arg)
    end if
    call option(arg, stoa('-D', '--debug'), opt_debug, val_debug, &
      & help="call dc_trace#SetDebug (display a lot of messages for debug). " // &
      & "VAL is unit number (default is standard output)")
    if (opt_debug) then
      if (trim(val_debug) == '') then
        call setdebug
      else
        call setdebug(stoi(val_debug))
      end if
    end if
    return

---

The documentation for this interface was generated from the following file:

• dc_utils/dc_args.f90