Skip to content

Commit

Permalink
Updated logging.
Browse files Browse the repository at this point in the history
  • Loading branch information
interkosmos committed Aug 4, 2024
1 parent 4a38f23 commit d2d2bb7
Showing 1 changed file with 3 additions and 1 deletion.
4 changes: 3 additions & 1 deletion app/dmdb.f90
Original file line number Diff line number Diff line change
Expand Up @@ -219,10 +219,10 @@ subroutine run(app, db, mqueue, sem)

steps = 0
call logger%info('started ' // dm_version_to_string(APP_NAME, APP_MAJOR, APP_MINOR, APP_PATCH))
call logger%debug('waiting for observ on mqueue /' // app%name)

ipc_loop: do
! Blocking read from POSIX message queue.
call logger%debug('waiting for observ on mqueue /' // app%name)
rc = dm_mqueue_read(mqueue, observ)

if (dm_is_error(rc)) then
Expand All @@ -231,6 +231,8 @@ subroutine run(app, db, mqueue, sem)
cycle ipc_loop
end if

call logger%debug('received observ ' // observ%name)

if (.not. dm_observ_valid(observ)) then
call logger%error('invalid observ ' // trim(observ%name), error=E_INVALID)
cycle ipc_loop
Expand Down

0 comments on commit d2d2bb7

Please sign in to comment.