Module Expect_test_common.Expectation

module Body : sig ... end
type 'a t = {
  1. tag : Base.string Base.option;
    (*

    Tag of the string payload

    *)
  2. body : 'a Body.t;
  3. extid_location : File.Location.t;
    (*

    Location of the extension id ("expect" or "expect_exact")

    *)
  4. body_location : File.Location.t;
    (*

    Location of the string payload of the extension point

    *)
}
val sexp_of_t : ('a -> Sexplib0.Sexp.t) -> 'a t -> Sexplib0.Sexp.t
include Base.Exported_for_specific_uses.Ppx_compare_lib.Comparable.S1 with type 'a t := 'a t
val compare : ('a -> 'a -> int) -> 'a t -> 'a t -> int
include Base.Exported_for_specific_uses.Ppx_compare_lib.Equal.S1 with type 'a t := 'a t
val equal : ('a -> 'a -> bool) -> 'a t -> 'a t -> bool
module Raw : sig ... end
val map_pretty : 'a t -> f:('a -> 'b) -> 'b t