!r
let rec token = lexer
- | [' ' '\t'] -> token lexbuf
- | "and" | "not" | "or" | "text" | "node"
+ | [' ' '\t' '\n'] -> token lexbuf
+ | "and" | "not" | "or" | "text()" | "node()"
| "self" | "descendant" | "child" | "descendant-or-self"
| "attribute" | "following-sibling" | "preceding-sibling"
| "parent" | "ancestor" | "ancestor-or-self" | "preceding" | "following"