Module Internal_pervasives.System_error

type static =
  1. | Exception of exn
  2. | Message of string
type t = [
  1. | `System_error of [ `Fatal ] * static
]
val fatal : static -> [> t ]
val fatal_message : string -> [> t ]
val fail_fatal : ?attach:(string * Attached_result.content) list -> static -> ('a, [> t ]) Asynchronous_result.t
val catch : ?attach:(string * Attached_result.content) list -> ('a -> 'b Lwt.t) -> 'c -> ('d, [> t ]) Attached_result.t Lwt.t
val catch_exn : ?attach:(string * Attached_result.content) list -> (unit -> 'a) -> ('b, [> t ]) Asynchronous_result.t
val fail_fatalf : ?attach:(string * Attached_result.content) list -> ('a, Stdlib.Format.formatter, unit, ('b, [> t ]) Asynchronous_result.t) Stdlib.format4 -> 'c
val pp : Stdlib.Format.formatter -> [< `System_error of [ `Fatal ] * static & [< `Fatal ] * static ] -> unit