sig   type t = int   val get : Fpath.t -> (Bos.OS.Path.Mode.t, [> Rresult.R.msg ]) Bos.OS.result   val set :     Fpath.t -> Bos.OS.Path.Mode.t -> (unit, [> Rresult.R.msg ]) Bos.OS.result end