package ocolor

You can search for identifiers within the package.

in-package search v0.2.0

On This Page

Printf-friendly functions
1. fprintf
  1. %a
  2. %t
2. sprintf
  1. %a
3. Printf-like

ocolor

Legend:
Library
Module
Module type
Parameter
Class
Class type

Printf-friendly functions

These functions are useful when trying to print with styles with Printf. However, they are a very bad choice. They perform a context-free formatting. For instance, there is no way to end the current style and restore the previous, like stack-base functions of Ocolor_format do. They just print the desired style and keep no track of the current state.

Thus, it's better to use Ocolor_format as much as possible. Moreover, Format provide a nice way of composing printers with %a and Format.asprintf. Even if you don't like boxes, Format.asprintf and semantic tags are cool.

So, here are the Printf-friendly functions. Use with care, and preferably, not at all.

fprintf

%a

val apply_style : out_channel -> Ocolor_types.style -> unit

val apply_styles : out_channel -> Ocolor_types.style list -> unit

val fg_color4 : out_channel -> Ocolor_types.color4 -> unit

val fg_color8 : out_channel -> Ocolor_types.color8 -> unit

val fg_color24 : out_channel -> Ocolor_types.color24 -> unit

val bg_color4 : out_channel -> Ocolor_types.color4 -> unit

val bg_color8 : out_channel -> Ocolor_types.color8 -> unit

val bg_color24 : out_channel -> Ocolor_types.color24 -> unit

%t

val default_fg : out_channel -> unit

val fg_rgb : int -> int -> int -> out_channel -> unit

val default_bg : out_channel -> unit

val bg_rgb : int -> int -> int -> out_channel -> unit

val reset : out_channel -> unit

sprintf

%a

val s_apply_style : unit -> Ocolor_types.style -> string

val s_apply_styles : unit -> Ocolor_types.style list -> string

Printf-like

Just like printf but perform automatic reset after printing if Ocolor_config.auto_reset is set

val fprintf : out_channel -> ('a, out_channel, unit) format -> 'a0

val kfprintf : 
  (out_channel -> unit) ->
  out_channel ->
  ('a, out_channel, unit) format ->
  'a0

val sprintf : ('a, unit, string, string) format4 -> 'a0

val printf : ('a, out_channel, unit) format -> 'a0

val kprintf : (out_channel -> unit) -> ('a, out_channel, unit) format -> 'a0

module StylingPrettyPrinters : sig ... end

include module type of struct include StylingPrettyPrinters end

type !'a pp = out_channel -> 'a -> unit

val pp_bool_generic : 
  ?false_style:Ocolor_types.style list ->
  ?true_style:Ocolor_types.style list ->
  bool pp

val pp_bool : bool pp

val pp_option_more_generic : 
  ?none:string ->
  ?none_style:Ocolor_types.style list ->
  ?some_style:Ocolor_types.style list ->
  ?some_format:
    (Ocolor_types.style list pp ->
      Ocolor_types.style list ->
      'a pp ->
      'a ->
      unit pp ->
      unit ->
      unit,
      out_channel,
      unit,
      unit,
      unit,
      unit)
      format6 ->
  ?none_format:
    (Ocolor_types.style list pp ->
      Ocolor_types.style list ->
      string ->
      unit pp ->
      unit ->
      unit,
      out_channel,
      unit,
      unit,
      unit,
      unit)
      format6 ->
  'a pp ->
  'a option pp

val pp_option_generic : 
  ?none:string ->
  ?none_style:Ocolor_types.style list ->
  ?some_style:Ocolor_types.style list ->
  'a pp ->
  'a option pp

val pp_option : 'a pp -> 'a option pp

val pp_result_more_generic : 
  ?ok_style:Ocolor_types.style list ->
  ?error_style:Ocolor_types.style list ->
  ?ok_format:
    (Ocolor_types.style list pp ->
      Ocolor_types.style list ->
      'a pp ->
      'a ->
      unit pp ->
      unit ->
      unit,
      out_channel,
      unit,
      unit,
      unit,
      unit)
      format6 ->
  ?error_format:
    (Ocolor_types.style list pp ->
      Ocolor_types.style list ->
      'b pp ->
      'b ->
      unit pp ->
      unit ->
      unit,
      out_channel,
      unit,
      unit,
      unit,
      unit)
      format6 ->
  'a pp ->
  'b pp ->
  ('a, 'b) result pp

val pp_result_generic : 
  ?ok_style:Ocolor_types.style list ->
  ?error_style:Ocolor_types.style list ->
  'a pp ->
  'b pp ->
  ('a, 'b) result pp

val pp_result : 'a pp -> 'b pp -> ('a, 'b) result pp

val pp_pair_generic : 
  ?left:string ->
  ?sep:string ->
  ?right:string ->
  ?delim_style:Ocolor_types.style list ->
  ?sep_style:Ocolor_types.style list ->
  ?elem_style:Ocolor_types.style list ->
  'a pp ->
  'b pp ->
  ('a * 'b) pp

val pp_pair : 'a pp -> 'b pp -> ('a * 'b) pp

val pp_3_tuple_generic : 
  ?left:string ->
  ?sep:string ->
  ?right:string ->
  ?delim_style:Ocolor_types.style list ->
  ?sep_style:Ocolor_types.style list ->
  ?elem_style:Ocolor_types.style list ->
  'a pp ->
  'b pp ->
  'c pp ->
  ('a * 'b * 'c) pp

val pp_3_tuple : 'a pp -> 'b pp -> 'c pp -> ('a * 'b * 'c) pp

val pp_4_tuple_generic : 
  ?left:string ->
  ?sep:string ->
  ?right:string ->
  ?delim_style:Ocolor_types.style list ->
  ?sep_style:Ocolor_types.style list ->
  ?elem_style:Ocolor_types.style list ->
  'a pp ->
  'b pp ->
  'c pp ->
  'd pp ->
  ('a * 'b * 'c * 'd) pp

val pp_4_tuple : 'a pp -> 'b pp -> 'c pp -> 'd pp -> ('a * 'b * 'c * 'd) pp

val pp_5_tuple_generic : 
  ?left:string ->
  ?sep:string ->
  ?right:string ->
  ?delim_style:Ocolor_types.style list ->
  ?sep_style:Ocolor_types.style list ->
  ?elem_style:Ocolor_types.style list ->
  'a pp ->
  'b pp ->
  'c pp ->
  'd pp ->
  'e pp ->
  ('a * 'b * 'c * 'd * 'e) pp

val pp_5_tuple : 
  'a pp ->
  'b pp ->
  'c pp ->
  'd pp ->
  'e pp ->
  ('a * 'b * 'c * 'd * 'e) pp

val pp_iterable_generic : 
  ?left:string ->
  ?sep:string ->
  ?right:string ->
  ?empty:string ->
  ?delim_style:Ocolor_types.style list ->
  ?sep_style:Ocolor_types.style list ->
  ?elem_style:Ocolor_types.style list ->
  ?empty_style:Ocolor_types.style list ->
  (('a -> unit) -> 'b -> unit) ->
  'a pp ->
  'b pp

val pp_iterable : (('a -> unit) -> 'b -> unit) -> 'a pp -> 'b pp

val pp_list_generic : 
  ?left:string ->
  ?sep:string ->
  ?right:string ->
  ?empty:string ->
  ?delim_style:Ocolor_types.style list ->
  ?sep_style:Ocolor_types.style list ->
  ?elem_style:Ocolor_types.style list ->
  ?empty_style:Ocolor_types.style list ->
  'a pp ->
  'a list pp

val pp_list : 'a pp -> 'a list pp

val pp_array_generic : 
  ?left:string ->
  ?sep:string ->
  ?right:string ->
  ?empty:string ->
  ?delim_style:Ocolor_types.style list ->
  ?sep_style:Ocolor_types.style list ->
  ?elem_style:Ocolor_types.style list ->
  ?empty_style:Ocolor_types.style list ->
  'a pp ->
  'a array pp

val pp_array : 'a pp -> 'a array pp

val pp_iterable_mapping_more_generic : 
  ?left:string ->
  ?sep:string ->
  ?right:string ->
  ?empty:string ->
  ?delim_style:Ocolor_types.style list ->
  ?sep_style:Ocolor_types.style list ->
  ?empty_style:Ocolor_types.style list ->
  (('a -> 'b -> unit) -> 'c -> unit) ->
  ('a * 'b) pp ->
  'c pp

val pp_iterable_mapping_generic : 
  ?left:string ->
  ?sep:string ->
  ?right:string ->
  ?mapsto:string ->
  ?empty:string ->
  ?delim_style:Ocolor_types.style list ->
  ?sep_style:Ocolor_types.style list ->
  ?mapsto_style:Ocolor_types.style list ->
  ?key_style:Ocolor_types.style list ->
  ?value_style:Ocolor_types.style list ->
  ?empty_style:Ocolor_types.style list ->
  (('a -> 'b -> unit) -> 'c -> unit) ->
  'a pp ->
  'b pp ->
  'c pp

val pp_iterable_mapping : 
  (('a -> 'b -> unit) -> 'c -> unit) ->
  'a pp ->
  'b pp ->
  'c pp

module NonStylingPrettyPrinters : sig ... end