Module Ppx_expect.Lifter
type filename
= Expect_test_common.Std.File.Name.t
class virtual 'alift_filename : object ... end
type location
= Expect_test_common.Std.File.Location.t
=
{
filename : filename;
line_number : int;
line_start : int;
start_pos : int;
end_pos : int;
}
and 'a body
= 'a Expect_test_common.Std.Expectation.Body.t
=
|
Exact of string
|
Output
|
Pretty of 'a
|
Unreachable
and 'a expectation
= 'a Expect_test_common.Std.Expectation.t
=
{
tag : string option;
body : 'a body;
extid_location : location;
body_location : location;
}
and raw
= string expectation
class virtual +'blift : object ... end