Update of /cvsroot/monetdb/MonetDB4/tests/from_Twente/moa/Tests
In directory
sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv4702/tests/from_Twente/moa/Tests
Added Files:
Tag: GDK-2
list.milS test.milS
Removed Files:
Tag: GDK-2
list.milM test.milM
Log Message:
propagated changes of Monday Sep 10 2007 - Tuesday Sep 18 2007
from the development trunk to the GDK-2 branch
--- test.milM DELETED ---
--- NEW FILE: list.milS ---
var indexA := new(oid,oid);
var valuesA := new(oid,int);
var orderA := new(oid,int);
var valuesD := new(void,int);
var indexB := new(oid,oid);
var valuesB := new(oid,int);
var idsB := new(oid,oid);
var orderB := new(oid,int);
var indexC := new(void,oid);
var valuesC := new(void,int);
indexA.insert([EMAIL PROTECTED],[EMAIL PROTECTED]);
indexA.insert([EMAIL PROTECTED],[EMAIL PROTECTED]);
indexA.insert([EMAIL PROTECTED],[EMAIL PROTECTED]);
indexA.insert([EMAIL PROTECTED],[EMAIL PROTECTED]);
indexA.insert([EMAIL PROTECTED],[EMAIL PROTECTED]);
valuesA.insert([EMAIL PROTECTED],10);
valuesA.insert([EMAIL PROTECTED],20);
valuesA.insert([EMAIL PROTECTED],30);
valuesA.insert([EMAIL PROTECTED],40);
[...1308 lines suppressed...]
_MMmergecast_7.find([EMAIL PROTECTED]).print();
_MMmergecast_7.find([EMAIL PROTECTED]).print();
_MMmergecast_7.find([EMAIL PROTECTED]).print();
# { 2 , 0 , 0 , 0 , 0 }
_MMreverse_2 := reverse(indexA);
_MMoper_3 := [<=](valuesB,2000);
_MMuselect_4 := uselect(_MMoper_3,true).mark([EMAIL PROTECTED]);
_MMjoin_5 := join(indexB,_MMuselect_4);
_MMoper_6 := {count}(_MMjoin_5);
_MMmergecast_7 := mergecast(_MMreverse_2,_MMoper_6,0);
reverse(copy_order(reverse(sort(reverse(orderA))),reverse(indexA))).print();
_MMmergecast_7.find([EMAIL PROTECTED]).print();
_MMmergecast_7.find([EMAIL PROTECTED]).print();
_MMmergecast_7.find([EMAIL PROTECTED]).print();
_MMmergecast_7.find([EMAIL PROTECTED]).print();
_MMmergecast_7.find([EMAIL PROTECTED]).print();
# [ 2 , 0 , 0 , 0 , 0 ]
quit();
--- list.milM DELETED ---
--- NEW FILE: test.milS ---
var indexA := new(void,oid);
var valuesA := new(void,int);
var valuesD := new(void,int);
var indexB := new(oid,oid);
var valuesB := new(oid,int);
var indexC := new(void,oid);
var valuesC := new(void,int);
var BAindex := new(void,oid);
indexA.insert(nil,[EMAIL PROTECTED]);
indexA.insert(nil,[EMAIL PROTECTED]);
indexA.insert(nil,[EMAIL PROTECTED]);
indexA.insert(nil,[EMAIL PROTECTED]);
valuesA.insert(nil,10);
valuesA.insert(nil,20);
valuesA.insert(nil,30);
valuesA.insert(nil,40);
indexA.seqbase([EMAIL PROTECTED]);
valuesA.seqbase([EMAIL PROTECTED]);
BAindex.insert(nil,[EMAIL PROTECTED]);
[...1033 lines suppressed...]
_MMjoin_11.find([EMAIL PROTECTED]).print();
# {< 20 , 20 >, < 30 , 30 >, < 40 , 40 >}
_MMoper_2 := [+](valuesA,10);
_MMoper_3 := [+](_MMoper_2,20);
_MMreverse_4 := reverse(_MMoper_3);
_MMjoin_5 := join(valuesA,_MMreverse_4);
_MMreverse_6 := reverse(_MMjoin_5);
_MMnilcast_7 := _MMreverse_6.reverse().mark([EMAIL PROTECTED]).reverse();
_MMjoin_8 := join(_MMnilcast_7,valuesA);
_MMreverse_9 := reverse(_MMjoin_8);
_MMnilcast_10 := _MMreverse_9.reverse().mark([EMAIL PROTECTED]).reverse();
var _MMnilcast_11 := _MMjoin_5.reverse().mark([EMAIL PROTECTED]).reverse();
var _MMjoin_12 := join(_MMnilcast_11,_MMoper_2);
_MMnilcast_10.print();
_MMjoin_8.find([EMAIL PROTECTED]).print();
_MMjoin_12.find([EMAIL PROTECTED]).print();
# {< 40 , 20 >}
quit();
-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2005.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Monetdb-checkins mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/monetdb-checkins
