Melange_compiler_libs.Translmod
let eval_rec_bindings:
Stdlib.ref((list((id_or_ignore_loc, option((Lambda.lambda, Lambda.lambda)),
Lambda.lambda)) =>
Lambda.lambda =>
Lambda.lambda));
let transl_implementation:
string =>
(Typedtree.structure, Typedtree.module_coercion) =>
Lambda.program;
let transl_store_phrases:
string =>
Typedtree.structure =>
(int, Lambda.lambda);
let transl_store_implementation:
string =>
(Typedtree.structure, Typedtree.module_coercion) =>
Lambda.program;
let transl_implementation_flambda:
string =>
(Typedtree.structure, Typedtree.module_coercion) =>
Lambda.program;
let transl_toplevel_definition: Typedtree.structure => Lambda.lambda;
let transl_package:
list(option(Ident.t)) =>
Ident.t =>
Typedtree.module_coercion =>
Lambda.lambda;
let transl_store_package:
list(option(Ident.t)) =>
Ident.t =>
Typedtree.module_coercion =>
(int, Lambda.lambda);
let transl_package_flambda:
list(option(Ident.t)) =>
Typedtree.module_coercion =>
(int, Lambda.lambda);
let primitive_declarations: Stdlib.ref(list(Primitive.description));
exception Error(Location.t, error);
let report_error: Location.t => error => Location.error;