LTerm_text_impl.MakeSourcemodule LiteralIntf : LiteralIntf.Typeval stylise_parenthesis :
(Zed_char.t * LTerm_style.t) array ->
?paren:(Zed_char.t * Zed_char.t) list ->
int ->
LTerm_style.t ->
unittype item = | S of LiteralIntf.string_intf| R of Zed_rope.t| B_bold of bool| E_bold| B_underline of bool| E_underline| B_blink of bool| E_blink| B_reverse of bool| E_reverse| B_fg of LTerm_style.color| E_fg| B_bg of LTerm_style.color| E_bgtype eval_stack = {mutable q_bold : bool option list;mutable q_underline : bool option list;mutable q_blink : bool option list;mutable q_reverse : bool option list;mutable q_fg : LTerm_style.color option list;mutable q_bg : LTerm_style.color option list;}val make_formatter :
?read_color:(Format.tag -> LTerm_style.t) ->
unit ->
(unit -> (Zed_char.t * LTerm_style.t) array) * Format.formatterval pp_with_style :
('a -> Format.tag) ->
'a ->
('b, Format.formatter, unit, unit) format4 ->
Format.formatter ->
'bval kstyprintf :
?read_color:(Format.tag -> LTerm_style.t) ->
((Zed_char.t * LTerm_style.t) array -> 'a) ->
('b, Format.formatter, unit, 'a) format4 ->
'bval styprintf :
?read_color:(Format.tag -> LTerm_style.t) ->
('a, Format.formatter, unit, (Zed_char.t * LTerm_style.t) array) format4 ->
'a