harness_descriptor Derived Type

type, public :: harness_descriptor


Components

Type Visibility Attributes Name Initial
character(len=THARN_MAXSTR), public :: configPath
character(len=THARN_MAXSTR), public :: reportType
character(len=THARN_MAXSTR), public :: setupReportType
character(len=THARN_MAXSTR), public :: testClass
character(len=THARN_MAXSTR), public :: topFname
integer, public :: failures
integer, public :: numRecords
type(problem_descriptor_records), public, pointer :: rcrd(:)

Source Code

  type harness_descriptor
     character(THARN_MAXSTR) :: configPath      ! path to configuration files
     character(THARN_MAXSTR) :: topFname        ! top level config filename
     character(THARN_MAXSTR) :: testClass       ! test class
     character(THARN_MAXSTR) :: reportType      ! test result report type 
     character(THARN_MAXSTR) :: setupReportType ! setup report type 
     integer :: numRecords                     ! number of problem descriptor filenames
     type(problem_descriptor_records), pointer :: rcrd(:)  ! problem descriptor recd 
     integer :: failures                       ! number of test failures
  end type harness_descriptor