Update of /cvsroot/monetdb/pathfinder/compiler/mil
In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv4697
Modified Files:
milgen.brg
Log Message:
The set_kind opperator is not needed in the update reduce function.
U milgen.brg
Index: milgen.brg
===================================================================
RCS file: /cvsroot/monetdb/pathfinder/compiler/mil/milgen.brg,v
retrieving revision 1.125
retrieving revision 1.126
diff -u -d -r1.125 -r1.126
--- milgen.brg 1 Apr 2008 11:54:23 -0000 1.125
+++ milgen.brg 2 Apr 2008 08:35:40 -0000 1.126
@@ -2436,7 +2436,6 @@
ty = type_of (L(p), pa_item);
-
/* consider update kind */
execute (
assgn (var (upd_kind->name),
@@ -2449,10 +2448,7 @@
assgn (var (pre_tgt->name),
VAR (L(p)->env, pa_item, aat_pre1)),
assgn (var (pre_cont_tgt->name),
- set_kind (VAR (L(p)->env,
- pa_item,
- aat_frag1),
- var (PF_MIL_VAR_ELEM))));
+ VAR (L(p)->env, pa_item, aat_frag1)));
else
execute (
assgn (var (pre_tgt->name),
@@ -2468,10 +2464,7 @@
assgn (var (attr_tgt->name),
VAR (L(p)->env, pa_item, aat_attr1)),
assgn (var (attr_cont_tgt->name),
- set_kind (VAR (L(p)->env,
- pa_item,
- aat_frag1),
- var (PF_MIL_VAR_ATTR))));
+ VAR (L(p)->env, pa_item, aat_frag1)));
else
execute (
assgn (var (attr_tgt->name),
@@ -2526,10 +2519,7 @@
assgn (var (pre_ins->name),
VAR (L(p)->env, pa_item, aat_pre)),
assgn (var (pre_cont_ins->name),
- set_kind (VAR (L(p)->env,
- pa_item,
- aat_frag),
- var (PF_MIL_VAR_ELEM))));
+ VAR (L(p)->env, pa_item, aat_frag)));
else
execute (
assgn (var (pre_ins->name),
@@ -2545,10 +2535,7 @@
assgn (var (attr_ins->name),
VAR (L(p)->env, pa_item, aat_attr)),
assgn (var (attr_cont_ins->name),
- set_kind (VAR (L(p)->env,
- pa_item,
- aat_frag),
- var (PF_MIL_VAR_ATTR))));
+ VAR (L(p)->env, pa_item, aat_frag)));
else
execute (
assgn (var (attr_ins->name),
-------------------------------------------------------------------------
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
