X-Git-Url: http://git.nguyen.vg/gitweb/?p=tatoo.git;a=blobdiff_plain;f=src%2Fxpath%2Fast.mli;h=0fc63d4289e1b84105038eb08c40f03519ed6e03;hp=f2a4df764f1c7bda85ed516ff93a8aa992f3b403;hb=53a0fd29a20e7f4550e0eb5fa5b0d5af6191c36d;hpb=30bc0bb1291426e5e26eb2dee1ffc41e4c246349

diff --git a/src/xpath/ast.mli b/src/xpath/ast.mli
index f2a4df7..0fc63d4 100644
--- a/src/xpath/ast.mli
+++ b/src/xpath/ast.mli
@@ -14,16 +14,21 @@
 (***********************************************************************)
 
 (*
-  Time-stamp: <Last modified on 2013-02-07 09:35:40 CET by Kim Nguyen>
+  Time-stamp: <Last modified on 2013-03-13 10:59:27 CET by Kim Nguyen>
 *)
 
 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
+and test = Utils.QNameSet.t * Tree.Common.NodeKind.t
 
 and binop = Eq | Neq | Lt | Gt | Lte | Gte | Or | And | Add | Sub | Mult | Div | Mod
 and unop =  Neg
@@ -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