Module Vmemitcodes
type reloc_info
=
|
Reloc_annot of Vmvalues.annot_switch
|
Reloc_const of Vmvalues.structured_constant
|
Reloc_getglobal of Names.Constant.t
|
Reloc_proj_name of Names.Projection.Repr.t
|
Reloc_caml_prim of CPrimitives.t
type patches
type emitcodes
val patch : emitcodes -> patches -> (reloc_info -> int) -> Vmvalues.tcode
type to_patch
= emitcodes * patches * Vmbytecodes.fv
type body_code
=
|
BCdefined of to_patch
|
BCalias of Names.Constant.t
|
BCconstant
val subst_body_code : Mod_subst.substitution -> body_code -> body_code
val to_memory : (Vmbytecodes.bytecodes * Vmbytecodes.bytecodes * Vmbytecodes.fv) -> to_patch
init code, fun code, fv