package mopsa

  1. Overview
  2. Docs

Module Core.Debug

Debug - Conditional debugging with channel filtering.

val channels : Str.regexp list ref
val print_warnings : bool ref
val print_color : bool ref
val print_all : bool ref
val white : int
val red : int
val green : int
val yellow : int
val blue : int
val magenta : int
val fushia : int
val orange : int
val teal : int
val gray : int
val pink : int
val add_channel : string -> unit
val parse : string -> unit
val set_channels : string -> unit
val can_print : string -> bool
val random_color : 'a -> int

Gives a random map of channel colors

val color : int -> (Format.formatter -> 'a -> unit) -> Format.formatter -> 'a -> unit
val color_str : int -> Format.formatter -> string -> unit
val bold : (Format.formatter -> 'a -> unit) -> Format.formatter -> 'a -> unit
val pp_channel : Format.formatter -> string -> unit
val pp_channel_with_time : 'a -> string -> unit
val debug : ?channel:??? -> ('a, Format.formatter, unit, unit) format4 -> 'a
val info : ('a, Format.formatter, unit, unit) format4 -> 'a
val plurial_list : Format.formatter -> 'a list -> unit
val plurial_int : Format.formatter -> int -> unit
val panic : ('a, Format.formatter, unit, unit) format4 -> 'a
val panic_at : Location.range -> ('a, Format.formatter, unit, unit) format4 -> 'a
val warn : ('a, Format.formatter, unit, unit) format4 -> 'a
val warn_at : Location.range -> ('a, Format.formatter, unit, unit) format4 -> 'a
val terminal_has_colors : unit -> bool