MonetDB: Apr2012 - Turn off debugmask while slowly filling a bat.

[Sjoerd Mullender]

Changeset: 2f2cf0f49292 for MonetDB
URL: http://dev.monetdb.org/hg/MonetDB?cmd=changeset;node=2f2cf0f49292
Modified Files:
        monetdb5/modules/kernel/Tests/vacuum.mal
        monetdb5/modules/kernel/Tests/vacuum.stable.out
Branch: Apr2012
Log Message:

Turn off debugmask while slowly filling a bat.
This uses the same code as the compress test for the same purpose: the
call to BATpropcheck in every iteration slows down the loop so much
that it doesn't finish within the allocated time.


diffs (48 lines):

diff --git a/monetdb5/modules/kernel/Tests/vacuum.mal 
b/monetdb5/modules/kernel/Tests/vacuum.mal
--- a/monetdb5/modules/kernel/Tests/vacuum.mal
+++ b/monetdb5/modules/kernel/Tests/vacuum.mal
@@ -4,6 +4,12 @@ b:= bat.new(:oid,:int);
 c:= bat.new(:oid,:oid);
 
 k:= 0;
+INT_MAX := 2147483647;
+dbgmsk_restore := mdb.getDebug();
+dbgmsk_unset := 8+8388608;
+dbgmsk_keep := calc.xor(INT_MAX,dbgmsk_unset);
+dbgmsk_set := calc.and(dbgmsk_restore,dbgmsk_keep);
+mdb.setDebug(dbgmsk_set);
 barrier (go,i):= language.newRange(0:lng);
        k:= k +1;
        barrier t:= k <= 1000;
@@ -13,6 +19,7 @@ barrier (go,i):= language.newRange(0:lng
        bat.append(b,k);
        redo (go,i):= language.nextElement(1:lng,1000000:lng);
 exit (go,i);
+mdb.setDebug(dbgmsk_restore);
 
 d:= algebra.copy(b);
 
diff --git a/monetdb5/modules/kernel/Tests/vacuum.stable.out 
b/monetdb5/modules/kernel/Tests/vacuum.stable.out
--- a/monetdb5/modules/kernel/Tests/vacuum.stable.out
+++ b/monetdb5/modules/kernel/Tests/vacuum.stable.out
@@ -21,6 +21,12 @@ function user.main():void;
     b := bat.new(:oid,:int);
     c := bat.new(:oid,:oid);
     k := 0;
+    INT_MAX := 2147483647;
+    dbgmsk_restore := mdb.getDebug();
+    dbgmsk_unset := calc.+(8,8388608);
+    dbgmsk_keep := calc.xor(INT_MAX,dbgmsk_unset);
+    dbgmsk_set := calc.and(dbgmsk_restore,dbgmsk_keep);
+    mdb.setDebug(dbgmsk_set);
 barrier (go,i) := language.newRange(0:lng);
     k := calc.+(k,1);
 barrier t := calc.<=(k,1000);
@@ -30,6 +36,7 @@ exit t;
     bat.append(b,k);
     redo (go,i) := language.nextElement(1:lng,1000000:lng);
 exit (go,i);
+    mdb.setDebug(dbgmsk_restore);
     d := algebra.copy(b);
     cnt := aggr.count(b);
     io.print(cnt);
_______________________________________________
Checkin-list mailing list
Checkin-list@monetdb.org
http://mail.monetdb.org/mailman/listinfo/checkin-list