let
file path : t =
{kind =
`
File
; path}