Melange_compiler_libs.Translobj
let oo_prim: string => Lambda.lambda;
let meth: Lambda.lambda => string => (Lambda.lambda, list(Lambda.lambda));
let transl_label_init: (unit => (Lambda.lambda, 'a)) => (Lambda.lambda, 'a);
let transl_store_label_init:
Ident.t =>
int =>
('a => Lambda.lambda) =>
'a =>
(int, Lambda.lambda);
let oo_wrap: Env.t => bool => ('a => Lambda.lambda) => 'a => Lambda.lambda;
let oo_add_class: Ident.t => (Env.t, bool);