report Interface

interface
private module subroutine report(test, passes, tests)

Arguments

Type IntentOptional Attributes Name
class(test_t), intent(in) :: test
integer, intent(inout) :: passes
integer, intent(inout) :: tests

Description

Print the test results and increment the tallies of passing tests and total tests