X-Git-Url: http://git.nguyen.vg/gitweb/?a=blobdiff_plain;f=ata.mli;h=3af690737540090d6d2b684ac7a0bafbb9a3ce89;hb=ac8720a930e5757a72f73e80aff7a988b0082831;hp=125e34b5680ad51b6e5b1d804fba69f50c963894;hpb=d046f2b9d8e39b30350399eafe122c30ff61c8c1;p=SXSI%2Fxpathcomp.git diff --git a/ata.mli b/ata.mli index 125e34b..3af6907 100644 --- a/ata.mli +++ b/ata.mli @@ -101,7 +101,10 @@ module IdSet : ResultSet module GResult (Doc : sig val doc : Tree.t end) : ResultSet val top_down_count : 'a t -> Tree.t -> int +val top_down_count1 : 'a t -> Tree.t -> int val top_down : 'a t -> Tree.t -> IdSet.t +val top_down1 : 'a t -> Tree.t -> IdSet.t + val bottom_up_count : 'a t -> Tree.t -> [> `CONTAINS of 'b | `TAG of Tag.t ] -> int val bottom_up : @@ -111,4 +114,5 @@ module Test (Doc : sig val doc : Tree.t end ) : sig module Results : ResultSet val top_down : 'a t -> Tree.t -> Results.t + val top_down1 : 'a t -> Tree.t -> Results.t end