val compile_implementation : string -> Lambda.lambda -> Instruct.instruction listval compile_phrase : Lambda.lambda -> Instruct.instruction list * Instruct.instruction listval reset : unit -> unitval merge_events : Instruct.debug_event -> Instruct.debug_event -> Instruct.debug_event