Fix bug in lexer preventig text and node from being valid tag names

git-svn-id: svn+ssh://idea.nguyen.vg/svn/sxsi/trunk/xpathcomp@1144 3cdefd35-fc62-479d-8e8d-bae585ffb9ca

diff --git a/src/ulexer.ml b/src/ulexer.ml
index bfff92e..05ab4ae 100644 (file)
--- a/src/ulexer.ml
+++ b/src/ulexer.ml
@@ -186,7 +186,7 @@ let parse_char lexbuf base i =
 
 let rec token = lexer
  | [' ' '\t'] -> token lexbuf
- | "and" | "not" | "or" | "text" | "node"
+ | "and" | "not" | "or" (* | "text" | "node" *)
  | "self" | "descendant" | "child" | "descendant-or-self" 
  | "attribute" | "following-sibling" | "preceding-sibling"
  | "parent" | "ancestor" | "ancestor-or-self" | "preceding" | "following"