Update of /cvsroot/monetdb/pathfinder/compiler/mil
In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv27483
Modified Files:
milgen.brg
Log Message:
making sure that the null values are casted to the correct type
for the update tape
U milgen.brg
Index: milgen.brg
===================================================================
RCS file: /cvsroot/monetdb/pathfinder/compiler/mil/milgen.brg,v
retrieving revision 1.124
retrieving revision 1.125
diff -u -d -r1.124 -r1.125
--- milgen.brg 28 Mar 2008 16:18:14 -0000 1.124
+++ milgen.brg 1 Apr 2008 11:54:23 -0000 1.125
@@ -2457,10 +2457,10 @@
execute (
assgn (var (pre_tgt->name),
project (var (upd_kind->name),
- nil())),
+ cast (type (mty_oid), nil()))),
assgn (var (pre_cont_tgt->name),
project (var (upd_kind->name),
- nil())));
+ cast (type (mty_oid), nil()))));
/* consider attribute tgt */
if (ty & aat_anode1)
@@ -2476,10 +2476,10 @@
execute (
assgn (var (attr_tgt->name),
project (var (upd_kind->name),
- nil())),
+ cast (type (mty_oid), nil()))),
assgn (var (attr_cont_tgt->name),
project (var (upd_kind->name),
- nil())));
+ cast (type (mty_oid), nil()))));
/* consider strings (which are arriving as aat_uA...) */
if (ty & aat_uA)
@@ -2490,7 +2490,7 @@
execute (
assgn (var (replace_strings->name),
project (var (upd_kind->name),
- nil())));
+ cast (type (mty_str), nil()))));
/* consider qnames */
if (ty & aat_qname)
@@ -2515,10 +2515,10 @@
execute (
assgn (var (replace_qn_uristrings->name),
project (var (upd_kind->name),
- nil())),
+ cast (type (mty_str), nil()))),
assgn (var (replace_qn_loc_strings->name),
project (var (upd_kind->name),
- nil())));
+ cast (type (mty_str), nil()))));
/* consider node ins */
if (ty & aat_pnode)
@@ -2534,10 +2534,10 @@
execute (
assgn (var (pre_ins->name),
project (var (upd_kind->name),
- nil())),
+ cast (type (mty_oid), nil()))),
assgn (var (pre_cont_ins->name),
project (var (upd_kind->name),
- nil())));
+ cast (type (mty_oid), nil()))));
/* consider attribute ins */
if (ty & aat_anode)
@@ -2553,10 +2553,10 @@
execute (
assgn (var (attr_ins->name),
project (var (upd_kind->name),
- nil())),
+ cast (type (mty_oid), nil()))),
assgn (var (attr_cont_ins->name),
project (var (upd_kind->name),
- nil())));
+ cast (type (mty_oid), nil()))));
/* execute update_tape */
execute (
-------------------------------------------------------------------------
Check out the new SourceForge.net Marketplace.
It's the best place to buy or sell services for
just about anything Open Source.
http://ad.doubleclick.net/clk;164216239;13503038;w?http://sf.net/marketplace
_______________________________________________
Monetdb-pf-checkins mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/monetdb-pf-checkins
