X-Git-Url: http://git.nguyen.vg/gitweb/?a=blobdiff_plain;f=src%2Fxpath%2Fast.mli;h=7cc91e4e5f28d53172c707ea40369ccc2f22ddea;hb=743aa7b5b11a28c2b0e6fa719101fc37bd43ce6c;hp=f2a4df764f1c7bda85ed516ff93a8aa992f3b403;hpb=30bc0bb1291426e5e26eb2dee1ffc41e4c246349;p=tatoo.git diff --git a/src/xpath/ast.mli b/src/xpath/ast.mli index f2a4df7..7cc91e4 100644 --- a/src/xpath/ast.mli +++ b/src/xpath/ast.mli @@ -14,14 +14,19 @@ (***********************************************************************) (* - Time-stamp: + Time-stamp: *) type path = single_path list and single_path = Absolute of step list | Relative of step list and step = axis * test * expr list -and axis = Self | Attribute | Child | Descendant | DescendantOrSelf | FollowingSibling - | Parent | Ancestor | AncestorOrSelf | PrecedingSibling | Preceding | Following +and axis = Self | Attribute | Child + | Descendant of bool + | FollowingSibling + | Parent + | Ancestor of bool + | PrecedingSibling + | Preceding | Following and test = Utils.QNameSet.t @@ -47,3 +52,4 @@ val print_axis : Format.formatter -> axis -> unit val print_test : Format.formatter -> test -> unit val print_expr : Format.formatter -> expr -> unit +val invert_axis : axis -> axis