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/
string my_arg;

string get_arg() {
    return my_arg;
}

void create(string arg) {
    my_arg = arg;
}

void do_tests() {
    object ob;
#ifdef __PACKAGE_UIDS__
    seteuid(0);
    ASSERT(catch(new(__FILE__)));
    seteuid(getuid(this_object()));
#endif
    ASSERT(new(__FILE__)->get_arg() == 0);
    ASSERT((string)new(__FILE__, "foo")->get_arg() == "foo");
}