let to_line ~sep t = let item_to_string = function | `int i -> Int.to_string i | `float f -> sprintf "%g" f | `string s -> s in Line.of_string_unsafe (String.concat_array ~sep (Array.map t ~f:item_to_string))