Removed testing cruft

[SXSI/xpathcomp.git] / tree.mli

diff --git a/tree.mli b/tree.mli
index a2ad7f3..b252bab 100644 (file)
--- a/tree.mli
+++ b/tree.mli
@@ -23,6 +23,8 @@ sig
   val first_child : t -> t
   val next_sibling : t -> t
   val parent : t -> t
+  val root : t -> t
+  val is_root : t -> bool
   val id : t -> int
   val tag : t -> Tag.t
   val print_xml_fast : out_channel -> t -> unit
@@ -34,7 +36,10 @@ sig
   end with type elt = string_content
   val string_below : t -> string_content -> bool
   val contains : t -> string -> DocIdSet.t
-  val contains_old : t -> string -> bool
+  val contains_old : t -> string -> DocIdSet.t
+  val contains_iter : t -> string -> DocIdSet.t
+  val count_contains : t -> string -> int
+  val count : t -> string -> int
   val dump : t -> unit 
   val get_string : t -> string_content -> string
   val has_tagged_desc : t -> Tag.t -> bool
@@ -43,6 +48,7 @@ sig
   val tagged_foll : t -> Tag.t -> t
   val tagged_next : t -> Tag.t -> t
   val subtree_tags : t -> Tag.t -> int
+  val is_left : t -> bool
 end
 
 module Binary : BINARY