Up

module Common

: sig
#
type line_tracker
#
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_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
end