let get_targets t ~id_list =
match t with
| `Standalone s ->
let open Standalone in
Deferred_list.while_sequential id_list ~f:(fun id ->
Ketrew_engine.get_target s.engine id)
| `Http_client c ->
Http_client.get_targets c ~id_list