20 lines
462 B
C
20 lines
462 B
C
void do_tests() {
|
|
object tp;
|
|
#ifndef __NO_ADD_ACTION__
|
|
SAVETP;
|
|
enable_commands();
|
|
RESTORETP;
|
|
ASSERT(!find_living("foo"));
|
|
set_living_name("foo");
|
|
ASSERT(find_living("foo") == this_object());
|
|
disable_commands();
|
|
ASSERT(!find_living("foo"));
|
|
enable_commands();
|
|
RESTORETP;
|
|
set_living_name("bar");
|
|
ASSERT(!find_living("foo"));
|
|
ASSERT(find_living("bar") == this_object());
|
|
destruct(this_object());
|
|
#endif
|
|
}
|