v22.2b14/
v22.2b14/Win32/
v22.2b14/compat/
v22.2b14/testsuite/
v22.2b14/testsuite/clone/
v22.2b14/testsuite/command/
v22.2b14/testsuite/data/
v22.2b14/testsuite/etc/
v22.2b14/testsuite/include/
v22.2b14/testsuite/inherit/
v22.2b14/testsuite/inherit/master/
v22.2b14/testsuite/log/
v22.2b14/testsuite/single/
v22.2b14/testsuite/single/tests/compiler/
v22.2b14/testsuite/single/tests/efuns/
v22.2b14/testsuite/single/tests/operators/
v22.2b14/testsuite/u/
v22.2b14/tmp/
/*
          efun: string capitalize(string);
   test author: John Garnett
          date: 1993 November 2
*/

void do_tests()
{
    string str1, str2, str3;

    str1 = "";
    str2 = capitalize(str1);
    str3 = "";
    ASSERT(str2 == str3);

    str1 = "driver";
    str2 = capitalize(str1);
    str3 = "Driver";
    ASSERT(str2 == str3);
    ASSERT(str1 == "driver");
    
    str1 = "Driver";
    str2 = capitalize(str1);
    str3 = "Driver";
    ASSERT(str2 == str3);
    ASSERT(str1 == "Driver");

    str1 = "42driver";
    str2 = capitalize(str1);
    str3 = "42driver";
    ASSERT(str2 == str3);
    ASSERT(str1 == "42driver");
}