Module Ecaml__.Face

module Frame = Ecaml__.Frame0
include Ecaml__.Import0.Value.Subtype
type value
type t = private value

We expose private value for free identity conversions when the value is nested in some covariant type, e.g. (symbols : Symbol.t list :> Value.t list) rather than List.map symbols ~f:Symbol.to_value.

val sexp_of_t : t -> Ppx_sexp_conv_lib.Sexp.t
val eq : t -> t -> bool

eq t1 t2 = Value.eq (to_value t1) (to_value t2), i.e. eq checks whether the Emacs values underlying t1 and t2 are physically equal. This is different than phys_equal t1 t2, because we don't always wrap eq Emacs values in phys_equal OCaml values. I.e. phys_equal t1 t2 implies eq t1 t2, but not the converse.

val is_in_subtype : value -> bool
include Ecaml_value__.Valueable0.S with type t := t
type t
type 'a type_
val of_value_exn : Ecaml_value__.Value0.t -> t
val to_value : t -> Ecaml_value__.Value0.t
val type_ : t type_
val t : t type_
include Core_kernel.Equal.S with type t := t
type t
val equal : t Core_kernel.Equal.equal
val default : t
val of_name : string -> t
val to_name : t -> string
module Background : sig ... end

(Info-goto-node "(elisp)Face Attributes")

module Box : sig ... end

(Info-goto-node "(elisp)Face Attributes")

module Font : sig ... end

(Info-goto-node "(elisp)Face Attributes")

module Font_family : sig ... end

Font family name or fontset name; the wild-card characters `*' and `?' are allowed. (Info-goto-node "(elisp)Face Attributes").

module Font_foundry : sig ... end

The name of the "font foundry" in which the font family attribute is located; the wild-card characters `*' and `?' are allowed. (Info-goto-node "(elisp)Face Attributes")

module Foreground : sig ... end

(Info-goto-node "(elisp)Face Attributes")

module Height : sig ... end

(Info-goto-node "(elisp)Face Attributes")

module Inherit : sig ... end

(Info-goto-node "(elisp)Face Attributes")

module Inverse_video : sig ... end

(Info-goto-node "(elisp)Face Attributes")

module Overline : sig ... end

(Info-goto-node "(elisp)Face Attributes")

module Slant : sig ... end

(Info-goto-node "(elisp)Face Attributes")

module Stipple : sig ... end

(Info-goto-node "(elisp)Face Attributes")

module Strike_through : sig ... end

(Info-goto-node "(elisp)Face Attributes")

module Underline : sig ... end

(Info-goto-node "(elisp)Face Attributes")

module Weight : sig ... end

(Info-goto-node "(elisp)Face Attributes")

module Width : sig ... end

(Info-goto-node "(elisp)Face Attributes")

module Attribute : sig ... end

(Info-goto-node "(elisp)Face Attributes")

module Attribute_and_value : sig ... end
val all_defined : unit -> t list

(describe-function 'face-list)

val font_family_list : ?⁠on:Frame.t -> unit -> string list

(describe-function 'face-attribute)

val attribute_value : ?⁠on:Frame.t -> t -> 'a Attribute.t -> 'a

(describe-function 'face-attribute)

val set_attribute : ?⁠on:Frame.t -> t -> 'a Attribute.t -> 'a -> unit

(describe-function 'set-face-attribute)

val attributes : ?⁠on:Frame.t -> t -> Attribute_and_value.t list

(describe-function 'face-all-attributes)

val spec_set : t -> Attribute_and_value.t list -> unit

(describe-function 'face-spec-set)

val defface : string -> Core_kernel.Source_code_position.t -> docstring:string -> customization_group:Ecaml.Customization.Group.t -> Attribute_and_value.t list -> t

(describe-function 'defface)