[frontierkernel-commits] odbs/frontierRoot/suites/fUnit/testTables name,NONE,1.1, description,NONE,1.1, testAssign,NONE,1.1, testRename,NONE,1.1, testSorting,NONE,1.1,

[Andre R. <and...@us...>]

Update of /cvsroot/frontierkernel/odbs/frontierRoot/suites/fUnit/testTables
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv17192

Added Files:
	name description testAssign testRename testSorting 
Log Message:
Add test suite for verifying various aspects of the table value type.

--- NEW FILE: testRename ---
FrontierVcsFile:1:scpt:suites.fUnit.testTables.testRename

on testRename () {
	
	on test (adrtable, ct) {
		new (tableType, adrtable);
		parentOf (this^)^.utils.insertRandom (adrtable, ct);
		assertEqual (sizeOf (adrtable^),  ct, "Insertion (random) is broken, incorrect number of items inserted");
		parentOf (this^)^.utils.verifySortByName (adrtable, "Insertion (random by name) is broken");
		for i = 1 to ct {
			name = string.getRandomPassword (5);
			if not defined (adrtable^.[name]) {
				table.rename (@adrtable^[random (1, ct)], name);
				assert (defined (adrtable^.[name]))}};
		assertEqual (sizeOf (adrtable^),  ct, "Renaming is broken, incorrect number of items after renaming");
		parentOf (this^)^.utils.verifySortByName (adrtable, "Renaming is broken")};
	
	test (@t, random (2, 199)); //test local table
	
	test (fUnit.getTempTableAdr (), random (2, 199)); //test temp table
	
	test (@scratchpad.fUnitTableTest, random (2, 199)); //test scratchpad table
	
	bundle { //test GDB table
		local (adrtop);
		adrtop = parentOf (this^)^.utils.openTestGDB ();
		test (@adrtop^.renaming, random (2, 199));
		parentOf (this^)^.utils.closeTestGDB ()};
	};

bundle { //debug code
	fUnit.runners.run (parentOf(this^), testCaseToRun: this)}
--- NEW FILE: testSorting ---
(This appears to be a binary file; contents omitted.)

--- NEW FILE: testAssign ---
(This appears to be a binary file; contents omitted.)

--- NEW FILE: name ---
FrontierVcsFile:1:TEXT:suites.fUnit.testTables.name

Tables
--- NEW FILE: description ---
FrontierVcsFile:1:wptx:suites.fUnit.testTables.description

Suite for testing various aspects of tables, started by Andre Radke.