fluffos-1.22/
fluffos-1.22/Win32/
fluffos-1.22/compat/
fluffos-1.22/testsuite/
fluffos-1.22/testsuite/clone/
fluffos-1.22/testsuite/command/
fluffos-1.22/testsuite/data/
fluffos-1.22/testsuite/etc/
fluffos-1.22/testsuite/include/
fluffos-1.22/testsuite/inherit/
fluffos-1.22/testsuite/inherit/master/
fluffos-1.22/testsuite/log/
fluffos-1.22/testsuite/single/
fluffos-1.22/testsuite/single/tests/compiler/
fluffos-1.22/testsuite/single/tests/efuns/
fluffos-1.22/testsuite/single/tests/operators/
fluffos-1.22/testsuite/u/
fluffos-1.22/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");
}