Update of /cvsroot/monetdb/pathfinder/runtime
In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv26181/runtime
Modified Files:
Tag: xquery-decomposition
pf_support.mx
Log Message:
propagated changes of Friday 15 Feb 2008 - Monday Feb 18 2008
from the development trunk to the xquery-decomposition branch
Index: pf_support.mx
===================================================================
RCS file: /cvsroot/monetdb/pathfinder/runtime/pf_support.mx,v
retrieving revision 1.277
retrieving revision 1.277.2.1
diff -u -d -r1.277 -r1.277.2.1
--- pf_support.mx 11 Jan 2008 10:47:20 -0000 1.277
+++ pf_support.mx 18 Feb 2008 16:21:40 -0000 1.277.2.1
@@ -1752,6 +1752,66 @@
@
@mil
+CONST AXIS_ancestor := 0;
+CONST AXIS_ancestor_or_self := 1;
+CONST AXIS_child := 2;
+CONST AXIS_descendant := 3;
+CONST AXIS_descendant_or_self := 4;
+CONST AXIS_following := 5;
+CONST AXIS_following_sibling := 6;
+CONST AXIS_parent := 7;
+CONST AXIS_preceding := 8;
+CONST AXIS_preceding_sibling := 9;
+CONST AXIS_self := 10;
+CONST AXIS_attribute := 11;
+CONST TEST_none := 0;
+CONST TEST_kind := 1;
+CONST TEST_ns := 2;
+CONST TEST_loc := 3;
+CONST TEST_nsloc := 4;
+CONST TEST_target := 5;
+
+PROC step (int axis, int test, bat[void,oid] iter, bat[void,oid] item,
bat[void,oid] cont, bat[void,bat] ws, int order, chr kind, str ns, str loc, str
tgt) : bat[void,bat]
+{
+ if (isnil(order)) order := 0;
+
+ if ((axis < AXIS_ancestor) or (axis > AXIS_attribute)) {
+ ERROR ("PROC step(): Unknown axis '%d' !", axis);
+ } else if ((test < TEST_none) or (test > TEST_target)) {
+ ERROR ("PROC step(): Unknown test '%d' !", test);
[EMAIL PROTECTED] PROC_step
+ } else if (axis = [EMAIL PROTECTED]) {
+ if (test = TEST_none ) {
+ return [EMAIL PROTECTED] (iter, item,
cont, ws, order);
+ } else if (test = TEST_kind ) {
+ return [EMAIL PROTECTED] (iter, item, cont, ws,
order, kind);
+ } else if (test = TEST_ns ) {
+ return [EMAIL PROTECTED] (iter, item, cont, ws,
order, ns);
+ } else if (test = TEST_loc ) {
+ return [EMAIL PROTECTED] (iter, item, cont, ws,
order, loc);
+ } else if (test = TEST_nsloc ) {
+ return [EMAIL PROTECTED] (iter, item, cont, ws, order,
ns, loc);
+ } else if (test = TEST_target) {
+ return [EMAIL PROTECTED] (iter, item, cont, ws, order,
tgt);
+ }
[EMAIL PROTECTED]
+ @:PROC_step(ancestor)@
+ @:PROC_step(ancestor_or_self)@
+ @:PROC_step(child)@
+ @:PROC_step(descendant)@
+ @:PROC_step(descendant_or_self)@
+ @:PROC_step(following)@
+ @:PROC_step(following_sibling)@
+ @:PROC_step(parent)@
+ @:PROC_step(preceding)@
+ @:PROC_step(preceding_sibling)@
+ } else if (axis = AXIS_self) {
+ ERROR ("PROC step(): AXIS_self not supported, yet!");
+ } else if (axis = AXIS_attribute) {
+ ERROR ("PROC step(): AXIS_attribute not supported, yet!");
+ }
+}
+
@:loop_lifted_scj_step1(parent)@
@:loop_lifted_scj_step1(ancestor)@
@:loop_lifted_scj_step1(ancestor_or_self)@
-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Monetdb-pf-checkins mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/monetdb-pf-checkins
