251
@verb #7639:"_kick" this none this rxdo #4017
@program #7639:"_kick" this none this
"Begin generic security check (_kick)"
if (verb == "_kick" && !args[1]:isa(this))
  raise(E_INVARG, "Illegal object", args[1])
  return E_INVARG
endif
"End generic security check (_kick)"
"Look for tricorder modules."
for x in [1..9999]
  object = toobj(x)
  $command_utils:suspend_if_needed()
  `object.module_ok ! E_PROPNF => 0' && this:_set_known_modules(setadd(this.known_modules, object))
  return pass(@args)
endfor
"Last modified by Lao-Tzu (#8084) on Tue Dec 18 08:29:54 2001 MST."
.

0