let get_registered_tasks () =
   Hashtbl.fold (fun t _ acu -> t :: acu) registered_tasks []