type file_descr val connect : ?cachesize:int -> string -> file_descr Cachet.t