let get_worker_need_health_check state =
  let now = OUnitUtils.now () in
    List.fold_left
      (fun lst (test_path, test_running) ->
         if test_running.next_health_check <= now then
           (test_path, test_running.worker) :: lst
         else
           lst)
      []
      state.tests_running