module Parser5: Xhtmlparser.Make
(
Camlp4.PreCast.Syntax
)
(
sig
val xml_encodedpcdata : Camlp4.PreCast.Ast.loc -> Camlp4.PreCast.Ast.expr
val xml_pcdata : Camlp4.PreCast.Ast.loc -> Camlp4.PreCast.Ast.expr
: Camlp4.PreCast.Ast.loc -> Camlp4.PreCast.Ast.expr
val xml_node : Camlp4.PreCast.Ast.loc -> Camlp4.PreCast.Ast.expr
val xml_string_attrib : Camlp4.PreCast.Ast.loc -> Camlp4.PreCast.Ast.expr
val tot : Camlp4.PreCast.Ast.loc -> Camlp4.PreCast.Ast.expr
val toeltl : Camlp4.PreCast.Ast.loc -> Camlp4.PreCast.Ast.expr
val to_xmlattribs : Camlp4.PreCast.Ast.loc -> Camlp4.PreCast.Ast.expr
val to_attrib : Camlp4.PreCast.Ast.loc -> Camlp4.PreCast.Ast.expr
val make_type : Camlp4.PreCast.Ast.loc -> string -> Camlp4.PreCast.Ast.ctyp
val make_content_type : Camlp4.PreCast.Ast.loc -> string -> Camlp4.PreCast.Ast.ctyp
val make_attrib_type : Camlp4.PreCast.Ast.loc -> string -> Camlp4.PreCast.Ast.ctyp
val make_attribs_type : Camlp4.PreCast.Ast.loc -> string -> Camlp4.PreCast.Ast.ctyp
end
)
module Xmllexer: Xmllexer.Make
(
Xhtmlparser.LexerArg
)
type
state = {
}
exception CamlListExc of string
module Error: sig
.. end
val err : Error.t -> Camlp4.PreCast.Loc.t -> 'a
val pop : state -> Xhtmlparser.LexerArg.token * state
val push : Xhtmlparser.LexerArg.token -> state -> unit
val expr_of_list : Camlp4.PreCast.Ast.loc ->
[< `Elt of Camlp4.PreCast.Ast.expr | `List of Camlp4.PreCast.Ast.expr ] list ->
Camlp4.PreCast.Ast.expr
val parse : Xmllexer.Loc.t ->
bool -> string -> (Xhtmlparser.LexerArg.token * Xmllexer.Loc.t) Stream.t
val get_expr : string -> Syntax.Gram.Loc.t -> Syntax.Ast.expr
val read_node : state -> Syntax.Ast.expr
val read_elems : ?tag:string -> state -> Camlp4.PreCast.Ast.expr
val read_attlist : state ->
Xhtmlparser.LexerArg.attribute list -> Camlp4.PreCast.Ast.expr
val clean_ws : state -> state
val to_expr : (Xhtmlparser.LexerArg.token * Camlp4.PreCast.Loc.t) Stream.t ->
Camlp4.PreCast.Loc.t -> Syntax.Ast.expr
val to_expr_taglist : (Xhtmlparser.LexerArg.token * Camlp4.PreCast.Loc.t) Stream.t ->
Camlp4.PreCast.Loc.t -> Camlp4.PreCast.Ast.expr
val remove_ws : string -> string
val xml_exp : Xmllexer.Loc.t -> string option -> string -> Syntax.Ast.expr
val xml_expl : Xmllexer.Loc.t -> string option -> string -> Camlp4.PreCast.Ast.expr