sig   val proceed_to_mass_killing :     Ketrew.Persistent_data.t ->     (bool, [> `Database of Ketrew.Persistent_data.Error.database ])     Unix_io.Deferred_result.t   val add_target_ids_to_kill_list :     Ketrew.Persistent_data.t ->     string list ->     (unit, [> `Database of Ketrew.Persistent_data.Error.database ])     Unix_io.Deferred_result.t end