let ft_handler_to_value (ft, handlers) = O.Raw.Tuple [ O.Raw.String ft ; O.Raw.List (List.map (fun s -> O.Raw.String s) handlers); ]