lambda-term
  1. Overview
  2. Docs
package lambda-term
Legend:
Library
Module
Module type
Parameter
Class
Class type

Parameters

Signature

type t = (Zed_char.t * LTerm_style.t) array
val of_string : Zed_string.t -> (Zed_char.t * LTerm_style.t) array
val of_utf8 : string -> (Zed_char.t * LTerm_style.t) array
val uchar_of_hex : int -> Uchar.t
val of_string_maybe_invalid : Zed_string.t -> (Zed_char.t * LTerm_style.t) array
val of_utf8_maybe_invalid : string -> (Zed_char.t * LTerm_style.t) array
val to_string : (Zed_char.t * 'a) array -> Zed_string.t
val of_rope : Zed_rope.rope -> (Zed_char.t * LTerm_style.t) array
val to_rope : (Zed_char.t * 'a) array -> Zed_rope.rope
val stylise : string -> 'a -> (Zed_char.t * 'a) array
val lparen : Zed_char.t
val rparen : Zed_char.t
val lbrace : Zed_char.t
val rbrace : Zed_char.t
val lbracket : Zed_char.t
val rbracket : Zed_char.t
type search_result =
  1. | No_match_found
  2. | No_paren_found
  3. | Match_found of int
val stylise_parenthesis : (Zed_char.t * LTerm_style.t) array -> ?paren:(Zed_char.t * Zed_char.t) list -> int -> LTerm_style.t -> unit
type item =
  1. | S of LiteralIntf.string_intf
  2. | R of Zed_rope.t
  3. | B_bold of bool
  4. | E_bold
  5. | B_underline of bool
  6. | E_underline
  7. | B_reverse of bool
  8. | E_reverse
  9. | B_fg of LTerm_style.color
  10. | E_fg
  11. | B_bg of LTerm_style.color
  12. | E_bg
type markup = item list
type eval_stack = {
  1. mutable q_bold : bool option list;
  2. mutable q_underline : bool option list;
  3. mutable q_reverse : bool option list;
  4. mutable q_fg : LTerm_style.color option list;
  5. mutable q_bg : LTerm_style.color option list;
}
val markup_length : item list -> int
val eval : item list -> (Zed_char.t * LTerm_style.t) array
Styled formatters
val make_formatter : ?read_color:(Format.tag -> LTerm_style.t) -> unit -> (unit -> (Zed_char.t * LTerm_style.t) array) * Format.formatter
val pp_with_style : ('a -> Format.tag) -> 'a -> ('b, Format.formatter, unit, unit) format4 -> Format.formatter -> 'b
val kstyprintf : ?read_color:(Format.tag -> LTerm_style.t) -> ((Zed_char.t * LTerm_style.t) array -> 'a) -> ('b, Format.formatter, unit, 'a) format4 -> 'b
val styprintf : ?read_color:(Format.tag -> LTerm_style.t) -> ('a, Format.formatter, unit, (Zed_char.t * LTerm_style.t) array) format4 -> 'a