let test_finished conf all_test_results worker state =
let ((test_path, _, _), _) = all_test_results in
let state =
{(add_test_results conf all_test_results state) with
tests_running = filter_out test_path state.tests_running;
idle_workers = worker :: state.idle_workers}
in
maybe_dump_cache conf state