Update of /cvsroot/monetdb/MonetDB5/src/mal
In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv17862/src/mal

Modified Files:
        mal_instruction.mx 
Log Message:
Added replica field to malblk for repl. bookkeeping and a variable flag 
VAR_STORED to distinguish repl. results kept.


Index: mal_instruction.mx
===================================================================
RCS file: /cvsroot/monetdb/MonetDB5/src/mal/mal_instruction.mx,v
retrieving revision 1.297
retrieving revision 1.298
diff -u -d -r1.297 -r1.298
--- mal_instruction.mx  24 Jan 2008 11:55:17 -0000      1.297
+++ mal_instruction.mx  28 Feb 2008 14:09:58 -0000      1.298
@@ -334,6 +334,7 @@
 #define VAR_INIT               32
 #define VAR_USED               64
 #define VAR_DISABLED   128 /* used for comments and scheduler */
+#define VAR_STORED     256 /* used for replicator */
 
 /* type check status is kept around to improve type checking efficiency */
 #define TYPE_ERROR      -1
@@ -413,6 +414,7 @@
        int keephistory;        /* do we need the history at all */
        str marker;                     /* history points are marked for 
backtracking */
        int maxarg;                     /* keep track on the maximal arguments 
used */
+       ptr replica;
 } *MalBlkPtr, MalBlkRecord;
 
 @-
@@ -456,6 +458,7 @@
 @:varProperty(Typedef,TYPEVAR)@
 @:varProperty(UDFtype,UDFTYPE)@
 @:varProperty(Constant,CONSTANT)@
+@:varProperty(Stored,STORED)@
 
 #define getVarConstant(M,I)     ((M)->var[I]->value)
 
@@ -663,6 +666,7 @@
        mb->profiler = NULL;
        mb->ptop = mb->psize = 0;
        mb->prps = NULL;
+       mb->replica = NULL;
        return mb;
 }
 


-------------------------------------------------------------------------
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-checkins mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/monetdb-checkins

Reply via email to