int called; int xverb; void do_tests() { #ifndef __NO_ADD_ACTION__ object tp; xverb = called = 0; SAVETP; enable_commands(); add_action( (: called = 1 :), "foo"); add_action( (: xverb = 1 :), "b", 1); RESTORETP; command("foo"); command("bar"); ASSERT(called); ASSERT(xverb); #endif }