|
| subroutine | tap_diag (str) |
| |
| function | itoa (i) |
| |
| character(len=12) function | rtoa (r) |
| |
| subroutine, public | tap_plan (tests, why) |
| |
| subroutine, public | tap_done () |
| |
| subroutine | tap_check (file, line, test, name) |
| |
| subroutine, public | tap_check_at_loc (file, line, test, name) |
| |
| subroutine, public | tap_check_op_at_loc (file, line, op, test, a, b, name) |
| |
| subroutine, public | tap_check_close_at_loc (file, line, a, b, eps, name) |
| |
| subroutine, public | tap_check_small_at_loc (file, line, a, eps, name) |
| |
- Author
- Manuel Jung
TAP: Test Anything Protocol For a short definition visit http://podwiki.hexten.net/TAP/TAP13.html?page=TAP13
◆ itoa()
| function tap::itoa |
( |
integer, intent(in) |
i | ) |
|
|
private |
◆ rtoa()
| character(len=12) function tap::rtoa |
( |
real, intent(in) |
r | ) |
|
|
private |
◆ tap_check()
| subroutine tap::tap_check |
( |
character(len=*), intent(in) |
file, |
|
|
integer, intent(in) |
line, |
|
|
logical, intent(in) |
test, |
|
|
character(len=*), intent(in) |
name |
|
) |
| |
|
private |
◆ tap_check_at_loc()
| subroutine, public tap::tap_check_at_loc |
( |
character(len=*), intent(in) |
file, |
|
|
integer, intent(in) |
line, |
|
|
logical, intent(in) |
test, |
|
|
character(len=*), intent(in) |
name |
|
) |
| |
◆ tap_check_close_at_loc()
| subroutine, public tap::tap_check_close_at_loc |
( |
character(len=*), intent(in) |
file, |
|
|
integer, intent(in) |
line, |
|
|
real, intent(in) |
a, |
|
|
real, intent(in) |
b, |
|
|
real, intent(in) |
eps, |
|
|
character(len=*), intent(in) |
name |
|
) |
| |
◆ tap_check_op_at_loc()
| subroutine, public tap::tap_check_op_at_loc |
( |
character(len=*), intent(in) |
file, |
|
|
integer, intent(in) |
line, |
|
|
character(len=*), intent(in) |
op, |
|
|
logical, intent(in) |
test, |
|
|
real, intent(in) |
a, |
|
|
real, intent(in) |
b, |
|
|
character(len=*), intent(in) |
name |
|
) |
| |
◆ tap_check_small_at_loc()
| subroutine, public tap::tap_check_small_at_loc |
( |
character(len=*), intent(in) |
file, |
|
|
integer, intent(in) |
line, |
|
|
real, intent(in) |
a, |
|
|
real, intent(in) |
eps, |
|
|
character(len=*), intent(in) |
name |
|
) |
| |
◆ tap_diag()
| subroutine tap::tap_diag |
( |
character(len=*), intent(in) |
str | ) |
|
|
private |
◆ tap_done()
| subroutine, public tap::tap_done |
( |
| ) |
|
◆ tap_plan()
| subroutine, public tap::tap_plan |
( |
integer, intent(in) |
tests, |
|
|
character(len=128), intent(in), optional |
why |
|
) |
| |
◆ current_test
| integer, save tap::current_test = 0 |
|
private |
◆ expected_tests
| integer, save tap::expected_tests = NO_PLAN |
|
private |
◆ failed_tests
| integer, save tap::failed_tests = 0 |
|
private |
◆ no_plan
| integer, parameter tap::no_plan = -1 |
|
private |
◆ skip_all
| integer, parameter tap::skip_all = -2 |
|
private |
