We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 30c331f commit c65f196Copy full SHA for c65f196
src/tests/io/test_parse_mode.f90
@@ -1,17 +1,17 @@
1
-program test_open
+program test_parse_mode
2
use stdlib_experimental_io, only: parse_mode
3
use stdlib_experimental_error, only: assert
4
implicit none
5
6
-call test_parse_mode()
+call test_parse_mode_expected_order()
7
8
call test_parse_mode_reverse_order()
9
10
call test_parse_mode_random_order()
11
12
contains
13
14
- subroutine test_parse_mode()
+ subroutine test_parse_mode_expected_order()
15
character(3) :: m
16
m = parse_mode("")
17
call assert(m == "r t")
0 commit comments