X-Git-Url: http://git.nguyen.vg/gitweb/?a=blobdiff_plain;f=src%2Fruntime.ml;fp=src%2Fruntime.ml;h=8337d2ad538cd51515a7e4df04d0bdabf7cc91f6;hb=b0f6895e9398185757f2587aacf3c47e0c236e32;hp=101aceb5c90135de96df1ec59cd10f733b1aae26;hpb=9975bb31b2447755c6853875b8d738aed8873859;p=SXSI%2Fxpathcomp.git

diff --git a/src/runtime.ml b/src/runtime.ml
index 101aceb..8337d2a 100644
--- a/src/runtime.ml
+++ b/src/runtime.ml
@@ -260,12 +260,12 @@ DEFINE LOOP_TAG (t, states, tag, ctx) = (
       match instr with
 	| L2JIT.NOP () -> nil_res
 	| L2JIT.FIRST_CHILD s -> LOOP ((Tree.first_child tree t), s, ctx)
-(*	| L2JIT.NEXT_SIBLING s -> LOOP ((Tree.next_sibling tree t), s, ctx) *)
-	| L2JIT.NEXT_SIBLING s -> LOOP ((Tree.next_node_before tree t ctx), s, ctx)
+	| L2JIT.NEXT_SIBLING s -> LOOP ((Tree.next_sibling tree t), s, ctx)
+(*	| L2JIT.NEXT_SIBLING s -> LOOP ((Tree.next_node_before tree t ctx), s, ctx) *)
 
 	| L2JIT.FIRST_ELEMENT s -> LOOP ((Tree.first_element tree t), s, ctx)
-(*	| L2JIT.NEXT_ELEMENT s -> LOOP ((Tree.next_element tree t), s, ctx) *)
-	| L2JIT.NEXT_ELEMENT s -> LOOP ((Tree.next_node_before tree t ctx), s, ctx)
+	| L2JIT.NEXT_ELEMENT s -> LOOP ((Tree.next_element tree t), s, ctx) 
+(*	| L2JIT.NEXT_ELEMENT s -> LOOP ((Tree.next_node_before tree t ctx), s, ctx) *)
 
 	| L2JIT.TAGGED_DESCENDANT (s, tag) ->
 	    LOOP_TAG ((Tree.tagged_descendant tree t tag), s, tag, ctx)