val transl_loc : Ppxlib.Location.t -> Expect_test_common.File.Location.tTranslate a compile time location to a runtime location
type data = Ppxlib.Location.t * string * string optiontype kind =| Normal| Exact| Unreachable| Output
val make : kind:kind -> data option -> extension_id_loc:Ppxlib.Location.t -> Expect_test_common.Expectation.Raw.tval pattern : unit -> (Ppxlib.Parsetree.payload, data option -> 'a, 'a) Ppxlib.Ast_pattern.t