/
MudOS_0.9.19/bin/
MudOS_0.9.19/doc/concepts/
MudOS_0.9.19/doc/driver/
MudOS_0.9.19/doc/efuns/bitstrings/
MudOS_0.9.19/doc/efuns/buffers/
MudOS_0.9.19/doc/efuns/communication/
MudOS_0.9.19/doc/efuns/core/
MudOS_0.9.19/doc/efuns/mappings/
MudOS_0.9.19/doc/efuns/math/
MudOS_0.9.19/doc/efuns/security/
MudOS_0.9.19/doc/lpc/constructs/
MudOS_0.9.19/doc/lpc/types/
MudOS_0.9.19/doc/platforms/
MudOS_0.9.19/etc/
MudOS_0.9.19/mudlib/
MudOS_0.9.19/mudlib/lil/
MudOS_0.9.19/mudlib/lil/clone/
MudOS_0.9.19/mudlib/lil/command/
MudOS_0.9.19/mudlib/lil/data/
MudOS_0.9.19/mudlib/lil/etc/
MudOS_0.9.19/mudlib/lil/include/
MudOS_0.9.19/mudlib/lil/inherit/
MudOS_0.9.19/mudlib/lil/inherit/master/
MudOS_0.9.19/mudlib/lil/log/
MudOS_0.9.19/mudlib/lil/single/
MudOS_0.9.19/mudlib/lil/u/
MudOS_0.9.19/src/testsuite/
MudOS_0.9.19/src/testsuite/clone/
MudOS_0.9.19/src/testsuite/command/
MudOS_0.9.19/src/testsuite/data/
MudOS_0.9.19/src/testsuite/etc/
MudOS_0.9.19/src/testsuite/include/
MudOS_0.9.19/src/testsuite/inherit/
MudOS_0.9.19/src/testsuite/inherit/master/
MudOS_0.9.19/src/testsuite/log/
MudOS_0.9.19/src/testsuite/single/
MudOS_0.9.19/src/testsuite/single/efuns/
MudOS_0.9.19/src/testsuite/u/
/*
          efun: string capitalize(string);
   test author: John Garnett
          date: 1993 November 2
*/

inherit "/inherit/tests";

int test(int which)
{
	string str1, str2, str3;

	switch (which) {
	case 0:
		describe_test("empty string");
		str1 = "";
		str2 = capitalize(str1);
		str3 = "";
		return (str2 == str3);
	break;

	case 1:
		describe_test("lowercase");
		str1 = "driver";
		str2 = capitalize(str1);
		str3 = "Driver";
		return (str2 == str3);
	break;

	case 2:
		describe_test("uppercase");
		str1 = "Driver";
		str2 = capitalize(str1);
		str3 = "Driver";
		return (str2 == str3);
	break;

	case 3:
		describe_test("numeric");
		str1 = "42driver";
		str2 = capitalize(str1);
		str3 = "42driver";
		return (str2 == str3);
	break;
	default:
	return -1;
	break;
	}
}