on_change_detected_all Subroutine

private subroutine on_change_detected_all(self, changed)

Call on_change_detected(changed) on all registered features.

Type Bound

feature_manager_t

Arguments

Type IntentOptional Attributes Name
class(feature_manager_t), intent(inout) :: self
type(string_t), intent(in), allocatable :: changed(:)

Calls

proc~~on_change_detected_all~~CallsGraph proc~on_change_detected_all feature_manager_t%on_change_detected_all proc~feat_change_noop watch_feature_t%feat_change_noop proc~on_change_detected_all->proc~feat_change_noop

Called by

proc~~on_change_detected_all~~CalledByGraph proc~on_change_detected_all feature_manager_t%on_change_detected_all proc~watcher_run watcher_t%watcher_run proc~watcher_run->proc~on_change_detected_all

Source Code

   subroutine on_change_detected_all(self, changed)
      class(feature_manager_t), intent(inout) :: self
      type(string_t), allocatable, intent(in) :: changed(:)
      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_change_detected(changed)
      end do
   end subroutine on_change_detected_all