open Base type config = { files : string list; } type t = config let parse args = { files = List.(of_array args |> tl_exn) }