Update of /cvsroot/monetdb/MonetDB4/src/modules/contrib/Tests
In directory
sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv16691/MonetDB4/src/modules/contrib/Tests
Added Files:
array.milS bitset.milS color.milS malalgebra.milS mprof2.milS
mprof.milS salgebra.milS
Removed Files:
array.milM bitset.milM color.milM malalgebra.milM mprof2.milM
mprof.milM salgebra.milM
Log Message:
(more) Mtest.py cleaning:
united extensions ".milM" & ".milS" into ".milS"
(they have been treated equally for a long time)
--- NEW FILE: array.milS ---
PROC test_array() : void := {
var idx1 := grid(2,2,1,1);
var idx2 := grid(1,2,2,1);
var data := new(void,chr);
data.insert(nil,'a');
data.insert(nil,'b');
data.insert(nil,'c');
data.insert(nil,'d');
seqbase(data,[EMAIL PROTECTED]);
print(data,idx1,idx2);
print_array(data,idx1,idx2);
data := new(void,chr);
data.insert(nil,'a');
data.insert(nil,'b');
seqbase(data,[EMAIL PROTECTED]);
data := concat(data,data,count(data));
print(data,idx1,idx2);
print_array(data,idx1,idx2);
data := cons(4,'a');
print(data,idx1,idx2);
print_array(data,idx1,idx2);
}
test_array();
quit();
--- color.milM DELETED ---
--- NEW FILE: bitset.milS ---
module("bitset");
test_bitset();
quit();
--- NEW FILE: mprof.milS ---
module("mprof");
test_mprof();
quit();
--- NEW FILE: mprof2.milS ---
module("mprof");
test_mprof();
quit();
--- NEW FILE: salgebra.milS ---
module("salgebra");
test_salgebra();
quit();
--- salgebra.milM DELETED ---
--- mprof2.milM DELETED ---
--- array.milM DELETED ---
--- mprof.milM DELETED ---
--- malalgebra.milM DELETED ---
--- bitset.milM DELETED ---
--- NEW FILE: malalgebra.milS ---
module("malalgebra");
test_malalgebra();
quit();
--- NEW FILE: color.milS ---
PROC test_color() : void := {
var c := rgb(100,101,102);
print(c);
print(red(c));
print(green(c));
print(blue(c));
c := hsv(90.0,0.5,1.0);
print(c);
# don't print hue, saturation, and value: architectural differences can
# cause differences in the output produced. instead, use them to produce
# a new color which should be the same as the original color
# print(hue(c));
# print(saturation(c));
# print(value(c));
print(hsv(hue(c), saturation(c), value(c)));
c := ycc(200,100,50);
print(c);
print(luminance(c));
print(cr(c));
print(cb(c));
c := color("0x0012ABcd");
print(c);
print(red(c));
print(green(c));
print(blue(c));
}
test_color();
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
