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 called;

void first_call() {
    called = 1;
}

void third_call() {
    ASSERT(!called);
}

void second_call() {
    ASSERT(!called);
    call_out( (: first_call :), 0);
    remove_call_out();
    call_out( (: third_call :), 1);
}

void do_tests() {
    called = 0;
    call_out( "first_call", 0);
    call_out( "second_call", 1);
    ASSERT(remove_call_out("first_call") != -1);
    ASSERT(remove_call_out("foo") == -1);
}