Library
Module
Module type
Parameter
Class
Class type
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.
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
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
val s_apply_style : unit -> Ocolor_types.style -> string
val s_apply_styles : unit -> Ocolor_types.style list -> string
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 -> 'a
val kfprintf :
(out_channel -> unit) ->
out_channel ->
('a, out_channel, unit) format ->
'a
val sprintf : ('a, unit, string, string) format4 -> 'a
val printf : ('a, out_channel, unit) format -> 'a
val kprintf : (out_channel -> unit) -> ('a, out_channel, unit) format -> 'a
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_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_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_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_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_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_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_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_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_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
module NonStylingPrettyPrinters : sig ... end