dsI/bin/
dsI/extra/creremote/
dsI/extra/mingw/
dsI/extra/wolfpaw/
dsI/fluffos-2.7-ds2.018/
dsI/fluffos-2.7-ds2.018/ChangeLog.old/
dsI/fluffos-2.7-ds2.018/Win32/
dsI/fluffos-2.7-ds2.018/compat/
dsI/fluffos-2.7-ds2.018/compat/simuls/
dsI/fluffos-2.7-ds2.018/testsuite/
dsI/fluffos-2.7-ds2.018/testsuite/clone/
dsI/fluffos-2.7-ds2.018/testsuite/command/
dsI/fluffos-2.7-ds2.018/testsuite/data/
dsI/fluffos-2.7-ds2.018/testsuite/etc/
dsI/fluffos-2.7-ds2.018/testsuite/include/
dsI/fluffos-2.7-ds2.018/testsuite/inherit/
dsI/fluffos-2.7-ds2.018/testsuite/inherit/master/
dsI/fluffos-2.7-ds2.018/testsuite/log/
dsI/fluffos-2.7-ds2.018/testsuite/single/
dsI/fluffos-2.7-ds2.018/testsuite/single/tests/compiler/
dsI/fluffos-2.7-ds2.018/testsuite/single/tests/efuns/
dsI/fluffos-2.7-ds2.018/testsuite/single/tests/operators/
dsI/fluffos-2.7-ds2.018/testsuite/u/
dsI/fluffos-2.7-ds2.018/tmp/
dsI/lib/cfg/
dsI/lib/cmds/common/
dsI/lib/cmds/creators/include/
dsI/lib/cmds/creators/include/SCCS/
dsI/lib/daemon/services/
dsI/lib/doc/
dsI/lib/domains/Ylsrim/
dsI/lib/domains/Ylsrim/adm/
dsI/lib/domains/Ylsrim/armour/
dsI/lib/domains/Ylsrim/broken/
dsI/lib/domains/Ylsrim/fish/
dsI/lib/domains/Ylsrim/meal/
dsI/lib/domains/Ylsrim/npc/
dsI/lib/domains/Ylsrim/virtual/
dsI/lib/domains/Ylsrim/weapon/
dsI/lib/domains/default/creator/
dsI/lib/domains/default/etc/
dsI/lib/domains/default/room/
dsI/lib/lib/comp/
dsI/lib/lib/lvs/
dsI/lib/lib/user/
dsI/lib/lib/virtual/
dsI/lib/obj/
dsI/lib/obj/include/
dsI/lib/realms/
dsI/lib/save/kills/a/
dsI/lib/save/kills/b/
dsI/lib/save/kills/f/
dsI/lib/save/kills/m/
dsI/lib/save/kills/q/
dsI/lib/save/kills/r/
dsI/lib/secure/cfg/
dsI/lib/secure/cfg/classes/
dsI/lib/secure/cfg/races/SCCS/
dsI/lib/secure/cmds/creators/include/
dsI/lib/secure/cmds/players/
dsI/lib/secure/cmds/players/include/
dsI/lib/secure/daemon/include/
dsI/lib/secure/lib/
dsI/lib/secure/lib/include/
dsI/lib/secure/lib/net/
dsI/lib/secure/lib/net/include/
dsI/lib/secure/lib/std/
dsI/lib/secure/obj/
dsI/lib/secure/obj/include/
dsI/lib/secure/save/
dsI/lib/spells/
dsI/lib/verbs/admins/include/
dsI/lib/verbs/common/
dsI/lib/verbs/common/include/
dsI/lib/verbs/creators/
dsI/lib/verbs/creators/include/
dsI/lib/verbs/players/include/SCCS/
dsI/lib/verbs/rooms/
dsI/lib/verbs/rooms/include/
dsI/lib/www/
dsI/v22.2b14/
dsI/win32/
void do_tests() {
    string src = "This is a test";

    for (int i = 0; i < 2; i++) {
	ASSERT(replace_string(src, "", "bar") == src);
	ASSERT(replace_string(src, "foo", "bar", 5, 4) == src);
    
	// case 1: rlen <= plen, plen > 1, rlen > 0
	ASSERT(replace_string(src, "is", "x") == "Thx x a test");
	ASSERT(replace_string(src, "is", "x", 1) == "Thx is a test");
	ASSERT(replace_string(src, "is", "x", 0, 0) == "Thx x a test");
	ASSERT(replace_string(src, "is", "x", 0, 1) == "Thx is a test");
	ASSERT(replace_string(src, "is", "x", 0, 2) == "Thx x a test");
	ASSERT(replace_string(src, "is", "x", 1, 1) == "Thx is a test");
	ASSERT(replace_string(src, "is", "x", 1, 2) == "Thx x a test");
	ASSERT(replace_string(src, "is", "x", 2, 2) == "This x a test");
	// case 2: rlen <= plen, plen > 1, rlen == 0
        ASSERT(replace_string(src, "is", "") == "Th  a test");
	ASSERT(replace_string(src, "is", "", 1) == "Th is a test");
	ASSERT(replace_string(src, "is", "", 0, 0) == "Th  a test");
	ASSERT(replace_string(src, "is", "", 0, 1) == "Th is a test");
	ASSERT(replace_string(src, "is", "", 0, 2) == "Th  a test");
	ASSERT(replace_string(src, "is", "", 1, 1) == "Th is a test");
	ASSERT(replace_string(src, "is", "", 1, 2) == "Th  a test");
	ASSERT(replace_string(src, "is", "", 2, 2) == "This  a test");
        // case 3: rlen <= plen, plen == 1, rlen > 0
	ASSERT(replace_string(src, "s", "x") == "Thix ix a text");
	ASSERT(replace_string(src, "s", "x", 1) == "Thix is a test");
	ASSERT(replace_string(src, "s", "x", 2) == "Thix ix a test");
	ASSERT(replace_string(src, "s", "x", 0, 0) == "Thix ix a text");
	ASSERT(replace_string(src, "s", "x", 0, 1) == "Thix is a test");
	ASSERT(replace_string(src, "s", "x", 0, 2) == "Thix ix a test");
	ASSERT(replace_string(src, "s", "x", 1, 1) == "Thix is a test");
	ASSERT(replace_string(src, "s", "x", 1, 2) == "Thix ix a test");
	ASSERT(replace_string(src, "s", "x", 1, 3) == "Thix ix a text");
	ASSERT(replace_string(src, "s", "x", 2, 2) == "This ix a test");
	// case 4: rlen <= plen, plen == 1, rlen == 0
	ASSERT(replace_string(src, "s", "") == "Thi i a tet");
	ASSERT(replace_string(src, "s", "", 1) == "Thi is a test");
	ASSERT(replace_string(src, "s", "", 2) == "Thi i a test");
	ASSERT(replace_string(src, "s", "", 0, 0) == "Thi i a tet");
	ASSERT(replace_string(src, "s", "", 0, 1) == "Thi is a test");
	ASSERT(replace_string(src, "s", "", 0, 2) == "Thi i a test");
	ASSERT(replace_string(src, "s", "", 1, 1) == "Thi is a test");
	ASSERT(replace_string(src, "s", "", 1, 2) == "Thi i a test");
	ASSERT(replace_string(src, "s", "", 1, 3) == "Thi i a tet");
	ASSERT(replace_string(src, "s", "", 2, 2) == "This i a test");
	// case 5: rlen > plen, plen > 1, rlen > 0
        ASSERT(replace_string(src, "is", "foo") == "Thfoo foo a test");
	ASSERT(replace_string(src, "is", "foo", 1) == "Thfoo is a test");
	ASSERT(replace_string(src, "is", "foo", 2) == "Thfoo foo a test");
	ASSERT(replace_string(src, "is", "foo", 0, 0) == "Thfoo foo a test");
	ASSERT(replace_string(src, "is", "foo", 0, 1) == "Thfoo is a test");
	ASSERT(replace_string(src, "is", "foo", 0, 2) == "Thfoo foo a test");
	ASSERT(replace_string(src, "is", "foo", 1, 1) == "Thfoo is a test");
	ASSERT(replace_string(src, "is", "foo", 1, 2) == "Thfoo foo a test");
	ASSERT(replace_string(src, "is", "foo", 1, 3) == "Thfoo foo a test");
	ASSERT(replace_string(src, "is", "foo", 2, 2) == "This foo a test");
	// case 6: rlen > plen, plen == 1
        ASSERT(replace_string(src, "s", "foo") == "Thifoo ifoo a tefoot");
	ASSERT(replace_string(src, "s", "foo", 1) == "Thifoo is a test");
	ASSERT(replace_string(src, "s", "foo", 2) == "Thifoo ifoo a test");
	ASSERT(replace_string(src, "s", "foo", 0, 0) == "Thifoo ifoo a tefoot");
	ASSERT(replace_string(src, "s", "foo", 0, 1) == "Thifoo is a test");
	ASSERT(replace_string(src, "s", "foo", 0, 2) == "Thifoo ifoo a test");
	ASSERT(replace_string(src, "s", "foo", 1, 1) == "Thifoo is a test");
	ASSERT(replace_string(src, "s", "foo", 1, 2) == "Thifoo ifoo a test");
	ASSERT(replace_string(src, "s", "foo", 1, 3) == "Thifoo ifoo a tefoot");
	ASSERT(replace_string(src, "s", "foo", 2, 2) == "This ifoo a test");

	src = src[0..5] + src[6..];
    }
}