css 0.2.0 · OCaml Package

Statement parsers.

val block_ : 
  (T.ctx -> 'a Angstrom.t) ->
  (T.ctx -> 'b Angstrom.t) ->
  (T.ctx -> 'c Angstrom.t) ->
  T.ctx ->
  'c Angstrom.t

val skip_to_next_prop : unit Angstrom.t

val skip_to_next_selector : unit Angstrom.t

val check_no_more_prop_value : T.ctx -> unit Angstrom.t

val check_no_more_selector_def : T.ctx -> unit Angstrom.t

val qname : T.ctx -> ((string * string) * T.loc) Angstrom.t

val ident_or_star : T.ctx -> string Angstrom.t

val revert_selector : 
  [< `Adjacent of
       'a S.single_selector
       * [< `Adjacent of 'a S.single_selector * 'b
         | `Child of 'a S.single_selector * 'b
         | `Inside of 'a S.single_selector * 'b
         | `Sibling of 'a S.single_selector * 'b
         | `Single of 'a S.single_selector ] as 'b
  | `Child of
    'a S.single_selector
    * [< `Adjacent of 'a S.single_selector * 'c
      | `Child of 'a S.single_selector * 'c
      | `Inside of 'a S.single_selector * 'c
      | `Sibling of 'a S.single_selector * 'c
      | `Single of 'a S.single_selector ] as 'c
  | `Inside of
    'a S.single_selector
    * [< `Adjacent of 'a S.single_selector * 'd
      | `Child of 'a S.single_selector * 'd
      | `Inside of 'a S.single_selector * 'd
      | `Sibling of 'a S.single_selector * 'd
      | `Single of 'a S.single_selector ] as 'd
  | `Sibling of
    'a S.single_selector
    * [< `Adjacent of 'a S.single_selector * 'e
      | `Child of 'a S.single_selector * 'e
      | `Inside of 'a S.single_selector * 'e
      | `Sibling of 'a S.single_selector * 'e
      | `Single of 'a S.single_selector ] as 'e
  | `Single of 'a S.single_selector ] ->
  'a S.selector

val sel_qname : T.ctx -> ((string * string) * T.loc) Angstrom.t

val sel_id : T.ctx -> (string * T.loc) Angstrom.t

val sel_pseudo_class : 
  T.ctx ->
  [< `Adjacent of
       string S.single_selector
       * [< `Adjacent of string S.single_selector * 'a
         | `Child of string S.single_selector * 'a
         | `Inside of string S.single_selector * 'a
         | `Sibling of string S.single_selector * 'a
         | `Single of string S.single_selector ] as 'a
  | `Child of
    string S.single_selector
    * [< `Adjacent of string S.single_selector * 'b
      | `Child of string S.single_selector * 'b
      | `Inside of string S.single_selector * 'b
      | `Sibling of string S.single_selector * 'b
      | `Single of string S.single_selector ] as 'b
  | `Inside of
    string S.single_selector
    * [< `Adjacent of string S.single_selector * 'c
      | `Child of string S.single_selector * 'c
      | `Inside of string S.single_selector * 'c
      | `Sibling of string S.single_selector * 'c
      | `Single of string S.single_selector ] as 'c
  | `Sibling of
    string S.single_selector
    * [< `Adjacent of string S.single_selector * 'd
      | `Child of string S.single_selector * 'd
      | `Inside of string S.single_selector * 'd
      | `Sibling of string S.single_selector * 'd
      | `Single of string S.single_selector ] as 'd
  | `Single of string S.single_selector ]
    Angstrom.t ->
  (string S.pseudo_class * T.loc) Angstrom.t

val sel_pseudo_elt : T.ctx -> (string * T.loc) Angstrom.t

val sel_attr_value : T.ctx -> 'a S.qname -> 'a S.attr_selector Angstrom.t

val sel_attr : T.ctx -> string S.attr_selector Angstrom.t

val sel_attribute : T.ctx -> (string S.attr_selector * T.loc) Angstrom.t

val sel_attributes : T.ctx -> (string S.attr_selector * T.loc) list Angstrom.t

val single_selector : 
  T.ctx ->
  [< `Adjacent of
       string S.single_selector
       * [< `Adjacent of string S.single_selector * 'a
         | `Child of string S.single_selector * 'a
         | `Inside of string S.single_selector * 'a
         | `Sibling of string S.single_selector * 'a
         | `Single of string S.single_selector ] as 'a
  | `Child of
    string S.single_selector
    * [< `Adjacent of string S.single_selector * 'b
      | `Child of string S.single_selector * 'b
      | `Inside of string S.single_selector * 'b
      | `Sibling of string S.single_selector * 'b
      | `Single of string S.single_selector ] as 'b
  | `Inside of
    string S.single_selector
    * [< `Adjacent of string S.single_selector * 'c
      | `Child of string S.single_selector * 'c
      | `Inside of string S.single_selector * 'c
      | `Sibling of string S.single_selector * 'c
      | `Single of string S.single_selector ] as 'c
  | `Sibling of
    string S.single_selector
    * [< `Adjacent of string S.single_selector * 'd
      | `Child of string S.single_selector * 'd
      | `Inside of string S.single_selector * 'd
      | `Sibling of string S.single_selector * 'd
      | `Single of string S.single_selector ] as 'd
  | `Single of string S.single_selector ]
    Angstrom.t ->
  string S.single_selector Angstrom.t

val selector_ : 
  T.ctx ->
  [ `Adjacent of string S.single_selector * 'a
  | `Child of string S.single_selector * 'a
  | `Inside of string S.single_selector * 'a
  | `Sibling of string S.single_selector * 'a
  | `Single of string S.single_selector ] as 'a
    Angstrom.t

val selector : T.ctx -> (string S.selector * T.loc) Angstrom.t

val selectors : T.ctx -> (string S.selector * T.loc) list Angstrom.t

val declaration : 
  (module P.Prop_space) ->
  T.ctx ->
  P.binding list ->
  P.binding list Angstrom.t

val declarations : 
  (module P.Prop_space) ->
  T.ctx ->
  P.binding list ->
  P.binding list Angstrom.t

val declaration_block : 
  (module P.Prop_space) ->
  T.ctx ->
  (P.binding list * string S.nested_rule list) Angstrom.t

val rule : (module P.Prop_space) -> T.ctx -> string S.rule_ Angstrom.t

val nested_rule_rel : T.ctx -> S.nested_rule_rel Angstrom.t

val nested_rule : 
  (module P.Prop_space) ->
  T.ctx ->
  string S.nested_rule_ Angstrom.t

val at_namespace : T.ctx -> 'a S.at_rule_ Angstrom.t

val at_charset : T.ctx -> 'a S.at_rule_ Angstrom.t

val layer_name : T.ctx -> string list Angstrom.t

val at_import_layer : T.ctx -> string list option Angstrom.t

val at_import : T.ctx -> 'a S.at_rule_ Angstrom.t

val at_layer : (module P.Prop_space) -> T.ctx -> string S.at_rule_ Angstrom.t

val at_media : (module P.Prop_space) -> T.ctx -> string S.at_rule_ Angstrom.t

val at_other : (module P.Prop_space) -> T.ctx -> string S.at_rule_ Angstrom.t

val at_rule : (module P.Prop_space) -> T.ctx -> string S.at_rule_ Angstrom.t

val statement : (module P.Prop_space) -> T.ctx -> string S.statement Angstrom.t

val statements : 
  (module P.Prop_space) ->
  T.ctx ->
  string S.statement list Angstrom.t

package css