module Common

val open_tracker : string -> Pervasives.out_channel -> line_tracker

val close_tracker : line_tracker -> unit

val copy_chunk : Pervasives.in_channel -> Pervasives.out_channel -> line_tracker -> Syntax.location -> bool -> unit

val output_mem_access : Pervasives.out_channel -> int -> unit

val output_memory_actions : string -> Pervasives.out_channel -> Lexgen.memory_action list -> unit

val output_env : Pervasives.in_channel -> Pervasives.out_channel -> line_tracker -> (Lexgen.ident * Lexgen.ident_info) list -> unit

val output_args : Pervasives.out_channel -> string list -> unit

val output_refill_handler : Pervasives.in_channel -> Pervasives.out_channel -> line_tracker -> Syntax.location option -> bool

val quiet_mode : bool Pervasives.ref