DirPath Derived Type

type, public, extends(StringVector) :: DirPath


Inherits

type~~dirpath~~InheritsGraph type~dirpath DirPath StringVector StringVector type~dirpath->StringVector

Type-Bound Procedures

procedure, public :: append

  • private subroutine append(this, directory, unusable, rc)

    Arguments

    Type IntentOptional Attributes Name
    class(DirPath), intent(inout) :: this
    character(len=*), intent(in) :: directory
    class(KeywordEnforcer), intent(in), optional :: unusable
    integer, intent(out), optional :: rc

procedure, public :: find

  • private function find(this, file, unusable, rc) result(full_name)

    Arguments

    Type IntentOptional Attributes Name
    class(DirPath), intent(in) :: this
    character(len=*), intent(in) :: file
    class(KeywordEnforcer), intent(in), optional :: unusable
    integer, intent(out), optional :: rc

    Return Value character(len=:), allocatable

Source Code

   type, extends(StringVector) :: DirPath
      private
   contains
      procedure :: find
      procedure :: append
   end type DirPath