MonetDB: default - Call the commit explicitly from the MAL

[mk]

Changeset: aa11dbe4f5dd for MonetDB
URL: http://dev.monetdb.org/hg/MonetDB?cmd=changeset;node=aa11dbe4f5dd
Modified Files:
        sql/backends/monet5/datacell/opt_datacell.mx
Branch: default
Log Message:

Call the commit explicitly from the MAL


diffs (24 lines):

diff --git a/sql/backends/monet5/datacell/opt_datacell.mx 
b/sql/backends/monet5/datacell/opt_datacell.mx
--- a/sql/backends/monet5/datacell/opt_datacell.mx
+++ b/sql/backends/monet5/datacell/opt_datacell.mx
@@ -91,8 +91,10 @@
        if( old[i]) {
         p = old[i];
                if ( getModuleId(p) == sqlRef  && getFunctionId(p) == 
putName("affectedRows",12)) {
-                       freeInstruction(p);
-                       continue;
+                       /* a good place to commit the SQL transaction */
+                       setFunctionId(p, commitRef);
+                       getArg(p,0)= newTmpVariable(mb, TYPE_any);
+                       p->argc= p->retc= 1;
                }
                if ( getModuleId(p) == sqlRef  && (getFunctionId(p) == bindRef 
||getFunctionId(p) == binddbatRef)){
                        schema = getVarConstant(mb, getArg(p,2)).val.sval;
@@ -186,6 +188,7 @@
        (void)stk;
        (void)pci;
 
+               printFunction(cntxt->fdout, mb, stk, LIST_MAL_STMT);
        if (actions)
        {
                addPipeDefinition("datacell_pipe",
_______________________________________________
Checkin-list mailing list
Checkin-list@monetdb.org
http://mail.monetdb.org/mailman/listinfo/checkin-list