| 1 |
open Encodings |
open Encodings |
| 2 |
|
|
| 3 |
exception Error of string |
exception Error of string |
| 4 |
module Node: Set.OrderedType |
type node |
|
type node = Node.t |
|
|
|
|
|
val src_of_uri: (string -> Pxp_types.source) ref |
|
| 5 |
|
|
| 6 |
|
val xml_parser: (string -> (string -> (string*string) list -> unit) -> (unit -> unit) -> unit) ref |
| 7 |
val node_of_uri: string -> node |
val node_of_uri: string -> node |
| 8 |
|
|
| 9 |
val _may_attr: string -> node -> Utf8.t option |
val _may_attr: string -> node -> Utf8.t option |
| 10 |
val _is_attr: string -> node -> string -> bool |
val _is_attr: string -> node -> string -> bool |
| 11 |
val _attr: string -> node -> Utf8.t |
val _attr: string -> node -> Utf8.t |
|
val _may_elem: string -> node -> node option |
|
|
val _elems: string -> node -> node list |
|
|
val _filter_elems: string list -> node -> node list |
|
|
|
|
|
val _line: node -> int |
|
|
|
|
|
val _iter_nodes: node -> (node -> unit) -> unit |
|
|
val _iter_elems: node -> (node -> string -> unit) -> unit |
|
|
val _fold_elems: node -> 'a -> ('a -> node -> string -> 'a) -> 'a |
|
|
val _tag: node -> string |
|
|
val _has_tag: node -> (string -> bool) -> bool |
|
|
val _namespaces: node -> (string * string) list |
|
|
|
|
|
val _find: (node -> bool) -> node -> node |
|
|
|
|
|
|
|
|
val has_xsd_prefix : Utf8.t -> bool |
|
|
val schema_ns_prefixes: (Utf8.t * Utf8.t) list |
|
| 12 |
|
|
| 13 |
val _resolve_qname: node -> Utf8.t -> Ns.qname |
val _resolve_qname: node -> Utf8.t -> Ns.qname |
| 14 |
val _may_qname_attr: string -> node -> Ns.qname option |
val _may_qname_attr: string -> node -> Ns.qname option |
| 15 |
val _qname_attr: string -> node -> Ns.qname |
val _qname_attr: string -> node -> Ns.qname |
| 16 |
|
|
| 17 |
|
val _tag: node -> string |
| 18 |
|
val _elems: string -> node -> node list |
| 19 |
|
val _fold_elems: node -> 'a -> ('a -> node -> string -> 'a) -> 'a |
| 20 |
|
val _filter_elems: string list -> node -> node list |
| 21 |
|
val _may_elem: string -> node -> node option |
| 22 |
|
val _iter_elems: node -> (node -> string -> unit) -> unit |
| 23 |
|
|
| 24 |
|
|
| 25 |
val xsd: Ns.t |
val xsd: Ns.t |
| 26 |
val xsi: Ns.t |
val xsi: Ns.t |