type t = | Error| Warning| Safe
val equal : t -> t -> Ppx_deriving_runtime.boolval pp :
Ppx_deriving_runtime.Format.formatter ->
t ->
Ppx_deriving_runtime.unitval show : t -> Ppx_deriving_runtime.stringval to_yojson : t -> [> `String of string ]val of_yojson : Yojson.Safe.t -> (t, string) Stdlib.result