on_before_run_all Subroutine

private subroutine on_before_run_all(self, cmd)

Call on_before_run(cmd) on all registered features.

Type Bound

feature_manager_t

Arguments

Type IntentOptional Attributes Name
class(feature_manager_t), intent(inout) :: self
character(len=:), intent(inout), allocatable :: cmd

Calls

proc~~on_before_run_all~~CallsGraph proc~on_before_run_all feature_manager_t%on_before_run_all proc~feat_before_noop watch_feature_t%feat_before_noop proc~on_before_run_all->proc~feat_before_noop

Called by

proc~~on_before_run_all~~CalledByGraph proc~on_before_run_all feature_manager_t%on_before_run_all proc~run_once run_once proc~run_once->proc~on_before_run_all proc~watcher_run watcher_t%watcher_run proc~watcher_run->proc~on_before_run_all proc~watcher_init watcher_t%watcher_init proc~watcher_init->proc~run_once

Source Code

   subroutine on_before_run_all(self, cmd)
      class(feature_manager_t), intent(inout) :: self
      character(len=:), allocatable, intent(inout) :: cmd
      integer :: i
      if (.not. allocated(self%feat)) return
      do i = 1, size(self%feat)
         if (allocated(self%feat(i)%p)) call self%feat(i)%p%on_before_run(cmd)
      end do
   end subroutine on_before_run_all