projects
/
tatoo.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
ajoute l'evaluation d'attributes
[tatoo.git]
/
src
/
query_tree.ml
diff --git
a/src/query_tree.ml
b/src/query_tree.ml
index
018036b
..
1599c4c
100644
(file)
--- a/
src/query_tree.ml
+++ b/
src/query_tree.ml
@@
-63,7
+63,7
@@
and compile_step_list p =
let open Xpath.Ast in
match a with
Self -> Self
- | Attribute ->
assert false
+ | Attribute ->
Parent
| Child -> Parent
| Descendant b ->
if not b then (Ancestor false)