Commit before changing Tree.ml interface
[SXSI/xpathcomp.git] / tree.mli
1 type t 
2 val init_contains : t -> string -> unit
3 val init_naive_contains : t -> string -> unit
4 val is_nil : t -> bool
5 val is_node : t -> bool
6 val dump_node : t -> string
7 val parse_xml_uri : string -> t
8 val parse_xml_string : string -> t
9 val save : t -> string -> unit
10 val load : ?sample:int -> string -> t
11 val tag_pool : t -> Tag.pool
12 val compare : t -> t -> int
13 val equal : t -> t -> bool
14 val mk_nil : t -> t
15 val root : t -> t
16 val is_root : t -> bool
17 val parent : t -> t
18 val first_child : t -> t
19 val tagged_child : Tag.t -> t ->  t
20 val select_child : Ptset.Int.t -> t ->  t
21
22 val next_sibling : t -> t
23
24 val tagged_sibling : Tag.t -> t ->  t
25 val tagged_sibling_ctx : Tag.t -> t -> t -> t
26
27 val select_sibling : Ptset.Int.t -> t -> t 
28 val select_sibling_ctx : Ptset.Int.t -> t -> t -> t
29
30 val next_sibling_ctx : t -> t -> t
31
32 val tag : t -> Tag.t
33 val id : t -> int
34
35 val tagged_desc : Tag.t -> t -> t
36 val select_desc : Ptset.Int.t -> t -> t
37
38 val tagged_foll_ctx : Tag.t -> t -> t -> t
39 val select_foll_ctx : Ptset.Int.t -> t -> t -> t
40
41 val count : t -> string -> int
42 val print_xml_fast : out_channel -> t -> unit
43
44 val tags_below : t -> Tag.t -> Ptset.Int.t
45 val tags_after : t -> Tag.t -> Ptset.Int.t
46 val tags : t -> Tag.t -> Ptset.Int.t*Ptset.Int.t
47 val is_below_right : t -> t -> bool
48 val is_left : t -> bool
49
50 val binary_parent : t -> t
51
52 val count_contains : t -> string -> int
53 val unsorted_contains : t -> string -> unit
54 val text_size : t -> int
55 val doc_ids : t -> int*int
56 val subtree_tags : t -> Tag.t -> int
57 val get_text : t -> string
58
59 val dump_tree : Format.formatter -> t -> unit