Make2.t
a virtual base class for all evaluators
inherit ['a, 'r, 's] domain
inherit ['a, 'r, 's] eff
inherit ['a, 'r] semantics
method type_error : type_error -> ('r, 'a) M.t
method division_by_zero : unit -> ('r, 'a) M.t