type 'e t = [
| `SystemFile of 'e |
| `SystemDirectory of 'e |
| `SystemMap of 'e |
| `File of Fpath.t * 'e |
| `Dir of Fpath.t * 'e |
| `Map of Fpath.t * 'e |
| `Read of Fpath.t * 'e |
| `Write of Fpath.t * 'e |
| `Open of Fpath.t * 'e |
| `Close of Fpath.t * 'e |
| `Create of Fpath.t * 'e |
| `Length of Fpath.t * 'e |
| `Map of Fpath.t * 'e |
| `Delete of Fpath.t * 'e |
| `Move of Fpath.t * Fpath.t * 'e |
| `Stack of Fpath.t |
]
val pp_error : (Stdlib.Format.formatter -> 'a -> unit) -> Stdlib.Format.formatter -> [< `Close of Fpath.t * 'a | `Create of Fpath.t * 'a | `Delete of Fpath.t * 'a | `Dir of Fpath.t * 'a | `File of Fpath.t * 'a | `Length of Fpath.t * 'a | `Map of Fpath.t * 'a | `Move of Fpath.t * Fpath.t * 'a | `Open of Fpath.t * 'a | `Read of Fpath.t * 'a | `Stack of Fpath.t | `SystemDirectory of 'a | `SystemFile of 'a | `SystemMap of 'a | `Write of Fpath.t * 'a ] -> unit