X-Git-Url: http://git.nguyen.vg/gitweb/?a=blobdiff_plain;f=ata.mli;h=a5fb3e148c43d6803a325f10a73b26cbef7b8e57;hb=cf6d366b25132eea7b0f1966c11d034d748af0fa;hp=1565caa8648f47ae2a619c8bd03a46efbabcaa85;hpb=329088598ab63bc2d67ff0dfc4f54e90f5d4f283;p=SXSI%2Fxpathcomp.git diff --git a/ata.mli b/ata.mli index 1565caa..a5fb3e1 100644 --- a/ata.mli +++ b/ata.mli @@ -104,6 +104,8 @@ val top_down_count : 'a t -> Tree.t -> int val top_down : '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 : + 'a t -> Tree.t -> [> `CONTAINS of 'b | `TAG of Tag.t ] -> IdSet.t module Test (Doc : sig val doc : Tree.t end ) : sig