Module Emitcode

val to_file : out_channel -> string -> string -> required_globals:Ident.Set.t -> Instruct.instruction list -> unit
val to_packed_file : out_channel -> Instruct.instruction list -> (Cmo_format.reloc_info * int) list
val reset : unit -> unit
val marshal_to_channel_with_possibly_32bit_compat : filename:string -> kind:string -> out_channel -> 'a -> unit