Update of /cvsroot/monetdb/pathfinder/compiler/mil
In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv1988/compiler/mil
Modified Files:
Tag: XQuery_0-24
milgen.brg
Log Message:
* fix the replace-element update function
- the core translation was not casting the uA to string when constracting
a text node,
- the assert was asserting aat_str instead of aat_pnode.
* made the findnodes milgen code slightly more compact.
U milgen.brg
Index: milgen.brg
===================================================================
RCS file: /cvsroot/monetdb/pathfinder/compiler/mil/milgen.brg,v
retrieving revision 1.157.2.2
retrieving revision 1.157.2.3
diff -u -d -r1.157.2.2 -r1.157.2.3
--- milgen.brg 27 May 2008 17:46:59 -0000 1.157.2.2
+++ milgen.brg 28 May 2008 11:08:21 -0000 1.157.2.3
@@ -9161,12 +9161,12 @@
mvar_t *iter = new_var (p->refctr);
mvar_t *item_res = new_var (p->refctr);
mvar_t *frag_res = new_var (p->refctr);
- PFmil_t *pre = NULL,
- *pre_cont = NULL;
-
-
- pre = VAR (L(p)->env, p->sem.findnodes.item_doc, aat_pre);
- pre_cont = VAR (L(p)->env, p->sem.findnodes.item_doc, aat_frag);
+ PFmil_t *pre = VAR (L(p)->env,
+ p->sem.findnodes.item_doc,
+ aat_pre),
+ *pre_cont = VAR (L(p)->env,
+ p->sem.findnodes.item_doc,
+ aat_frag);
execute (
assgn (var (nodes->name),
@@ -9178,13 +9178,14 @@
pre_cont,
VAR (L(p)->env, p->sem.findnodes.item, aat_str),
p->sem.findnodes.id == la_dj_id ? lit_bit (true) :
- lit_bit (false)
- )));
+ lit_bit
(false))));
execute (
assgn (var (iter->name),
leftfetchjoin (hmark (var (nodes->name), lit_oid(0)),
- VAR (L(p)->env, p->sem.findnodes.iter,
aat_nat))),
+ VAR (L(p)->env,
+ p->sem.findnodes.iter,
+ aat_nat))),
assgn (var (item_res->name),
tmark ( var (nodes->name), lit_oid(0))),
assgn (var (frag_res->name),
-------------------------------------------------------------------------
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
