Module Cascade

type origin =
  1. | User_agent
  2. | Author
type sheet = {
  1. origin : origin;
  2. rules : Css_syntax.rule list;
}
type media = {
  1. width : float;
  2. height : float;
}
val media_matches : media -> Css_syntax.component list -> bool
val cascade : ?visited:(string -> bool) -> media -> sheet list -> Dom.element -> Dom.element -> (string * Css_syntax.component list) list
val find_element : (int, Dom.element * 'a) Stdlib.Hashtbl.t -> Dom.element -> 'a option
val rules : media -> sheet list -> (origin * Selectors.complex * Css_syntax.declaration list) list
type source =
  1. | Rule of {
    1. sheet : int;
    2. selector : Selectors.complex;
    }
  2. | Hint
  3. | Style_attribute
val explain : ?visited:(string -> bool) -> media -> sheet list -> Dom.element -> Dom.element -> (string * Css_syntax.component list * source * bool) list