dc_args::close Interface Reference

Public Member Functions
subroutine	dcargsclose0 (arg)

Detailed Description

Definition at line 274 of file dc_args.f90.

Member Function/Subroutine Documentation

dcargsclose0()

subroutine dc_args::close::dcargsclose0

(

type(args), intent(inout)

arg

)

Definition at line 367 of file dc_args.f90.

    !
    ! ARGS 型の変数の終了処理を行います. 
    !
    use dc_hash, only: dchashdelete
    implicit none
    type(ARGS), intent(inout) :: arg
    integer :: i
  continue
    if (arg % initialized) then
      if ( associated( arg % opt_table ) ) then
        do i = 1, size(arg % opt_table)
          deallocate(arg % opt_table(i) % options)
        end do
 
        deallocate(arg % opt_table)
      end if
 
      deallocate(arg % cmd_opts_list)
      deallocate(argstr_table)
      deallocate(cmd_argv_list)
      deallocate(cmd_opts_list)
 
      call dchashdelete(arg % helpmsg)
    end if

---

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

• dc_utils/dc_args.f90