type
t ={
kind : [
`
Directory
|
`
File
];
path : string;
} [@@deriving yojson]