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/
int light = 0;

#define CHK ASSERT(light = set_light(0));

#ifndef __NO_ENVIRONMENT__
void move_or_destruct(object ob) {
    move_object(new("/single/void"));
}
#endif

void do_tests() {
    object ob;
    
#ifndef __NO_LIGHT__
    CHK;
    set_light(2);
    light += 2;
    CHK;

#ifndef __NO_ENVIRONMENT__
    ob = new(__DIR__ "light");
    ob->move(this_object());
    light += 3;
    CHK;

    destruct(ob);
    light -= 3;
    CHK;
    
    ob = new(__DIR__ "light");
    move_object(ob);
    light += 3;
    CHK;
    
    destruct(ob);
    light -= 3;
    CHK;
#endif    
#endif
}