Define a test harness encapsulating an array of text fixtures, each of which can run a set of tests.
Component-wise user-defined structure constructor
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(test_fixture_t) | :: | test_fixtures(:) |
If command line includes -h or --help, print usage information and stop. Otherwise, run tests and print results, including diagnostics for any failures. Also, tally and print the numbers of passing tests, total tests, skipped tests.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(test_harness_t), | intent(in) | :: | self |
Encapsulate a set of test fixtures, each of which can run a set of tests.
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
type(test_fixture_t), | private, | allocatable | :: | test_fixture_(:) |
private module function component_constructor (test_fixtures) | Component-wise user-defined structure constructor |
procedure, public :: report_results |