Module LTerm_style

module LTerm_style: sig .. end
Text styles


Colors

type color = private 
| Default (*The default color of the terminal.*)
| Index of int (*A color given by its index. Most terminal have at least 8 colors.*)
| RGB of int * int * int (*A color given by its three component between 0 and 255. The closest color will be used.*)
val default : color
val index : int -> color
val rgb : int -> int -> int -> color
rgb r g b raises Invalid_argument if one of r, g or b is not in the range 0..255.

Standard colors

val black : color
val red : color
val green : color
val yellow : color
val blue : color
val magenta : color
val cyan : color
val white : color

Light colors

val lblack : color
val lred : color
val lgreen : color
val lyellow : color
val lblue : color
val lmagenta : color
val lcyan : color
val lwhite : color

Styles

type t = {
   bold : bool option;
   underline : bool option;
   blink : bool option;
   reverse : bool option;
   foreground : color option;
   background : color option;
}
Type of text styles.
val bold : t -> bool option
val underline : t -> bool option
val blink : t -> bool option
val reverse : t -> bool option
val foreground : t -> color option
val background : t -> color option
val none : t
Style with all fields set to None.
val merge : t -> t -> t
merge s1 s2 is s2 with all undefined fields set to ones of s1.
val equal : t -> t -> bool
equal s1 s2 returns true iff s1 and s2 are equal after having replaced all None fields by Some false or Some Default.