Skip to content

Commit fa0e423

Browse files
committed
addition of a log msg in test logger
1 parent cee1bac commit fa0e423

File tree

1 file changed

+9
-1
lines changed

1 file changed

+9
-1
lines changed

src/tests/logger/test_stdlib_logger.f90

Lines changed: 9 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -134,6 +134,14 @@ subroutine test_logging_configuration()
134134
module = 'N/A', &
135135
procedure = 'TEST_STDLIB_LOGGER' )
136136

137+
call global % log_information( 'This message should be output ' // &
138+
'to OUTPUT_UNIT, unlimited in width, not preceded by ' // &
139+
'a blank line, then by a time stamp, then by MODULE % ' // &
140+
'PROCEDURE, be prefixed by INFO. ' // new_line('a') // &
141+
'This is a new line of the same log message.', &
142+
module = 'N/A', &
143+
procedure = 'TEST_STDLIB_LOGGER' )
144+
137145
call global % configure( add_blank_line=.true., indent=.false., &
138146
max_width=72, time_stamp=.false. )
139147

@@ -142,7 +150,7 @@ subroutine test_logging_configuration()
142150
log_units=log_units )
143151

144152
if ( add_blank_line ) then
145-
write(*,*) 'ADD_BLANK_LINE is now .FALSE. as expected.'
153+
write(*,*) 'ADD_BLANK_LINE is now .TRUE. as expected.'
146154

147155
else
148156
error stop 'ADD_BLANKLINE is now .FALSE. contrary to expectations.'

0 commit comments

Comments
 (0)