Module Expect_test_common__Expectation

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

Tag of the string payload

body : 'a Body.t;
extid_location : Expect_test_common.File.Location.t;

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

body_location : Expect_test_common.File.Location.t;

Location of the string payload of the extension point

}
val sexp_of_t : ('a -> Base.Sexp.t) -> 'a t -> Base.Sexp.t
val compare : ('a -> 'a -> Base.int) -> 'a t -> 'a t -> Base.int
val equal : ('a -> 'a -> Base.bool) -> 'a t -> 'a t -> Base.bool
module Raw : sig ... end
val map_pretty : 'a t -> f:('a -> 'b) -> 'b t