type analysis_failure = {
msg : string;
loc : small_loc option;
is_preprocessing : bool;
in_target : string option;
}
val analysis_failure_of_yojson :
Yojson.Safe.t ->
analysis_failure Ppx_deriving_yojson_runtime.error_or
type misc_failure = {
msg : string;
loc : small_loc option;
}
val misc_failure_of_yojson :
Yojson.Safe.t ->
misc_failure Ppx_deriving_yojson_runtime.error_or
val result_to_yojson : result -> Yojson.Safe.t
val result_of_yojson :
Yojson.Safe.t ->
result Ppx_deriving_yojson_runtime.error_or
type t = {
filename : string;
result : result;
diff : string option;
}
val to_yojson : t -> Yojson.Safe.t
val of_yojson : Yojson.Safe.t -> t Ppx_deriving_yojson_runtime.error_or
val _ : Yojson.Safe.t -> t Ppx_deriving_yojson_runtime.error_or
val make : filename:string -> result:result -> ?diff:string -> unit -> t