Skip to content

Commit f9f7755

Browse files
authored
Make invalid logical example more compiler agnostic
1 parent 99954bb commit f9f7755

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

src/tests/string/test_strings_format_string.f90

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -56,8 +56,8 @@ program test_strings_format_string
5656
& " F T", &
5757
& "Multiple formatters for logical values")
5858
! Wrong demonstration
59-
call check_formatter(format_string(.false., '(I5)'), "*", &
60-
& "Integer formatter for logical value", partial=.true.)
59+
call check_formatter(format_string(.false., '(1x)'), "*", &
60+
& "Invalid formatter for logical value", partial=.true.)
6161

6262
contains
6363
subroutine check_formatter(actual, expected, description, partial)

0 commit comments

Comments
 (0)