Skip to content

Commit 1260821

Browse files
committed
- updated README.md to previous source code changes
1 parent 4fac453 commit 1260821

File tree

1 file changed

+16
-12
lines changed

1 file changed

+16
-12
lines changed

README.md

Lines changed: 16 additions & 12 deletions
Original file line numberDiff line numberDiff line change
@@ -34,39 +34,43 @@ program good_test
3434
use unit_test
3535
3636
implicit none
37-
38-
type(test_suite_type) specific_suite
39-
40-
! example with default suite
41-
call test_case_init()
4237
38+
type(test_suite_type) :: specific_suite
39+
40+
! example with default suite
41+
call test_suite_init()
4342
call test_case_create('Test 1')
4443
4544
! By sending macros __FILE__ and __LINE__, report will print the file and line number where assertion fails.
4645
call assert_approximate(1.0, 2.0, __FILE__, __LINE__) ! line 14
4746
47+
! report the complete suite
4848
call test_suite_report()
49+
50+
! finalize
4951
call test_case_final()
50-
52+
5153
! example with specific suite
52-
specific_suite%name = 'my specific test suite'
54+
call test_suite_init('my specific test suite', specific_suite)
5355
call test_case_create('Specific Test 1', specific_suite)
5456
! suite = SUITE need in this case (cause optional argument eps, file_name, line_number is missing)
5557
call assert_approximate(1.0, 2.0, suite=specific_suite)
56-
58+
5759
call test_case_create('Specific Test 2', specific_suite)
5860
! suite = SUITE need in this case (cause optional argument eps is missing)
5961
call assert_equal(1.0, 2.0, __FILE__, __LINE__, suite=specific_suite)
60-
62+
6163
call test_case_create('Specific Test 3', specific_suite)
6264
call assert_approximate(1.0, 2.0, __FILE__, __LINE__, 1E-0, specific_suite)
63-
65+
6466
! report a test_case
6567
call test_case_report('Specific Test 2', specific_suite)
66-
68+
6769
! report the complete suite
6870
call test_suite_report(specific_suite)
69-
call test_case_final(specific_suite)
71+
72+
! finalize
73+
call test_suite_final(specific_suite)
7074
7175
end program good_test
7276
```

0 commit comments

Comments
 (0)