219
@verb #5252:"_kick" this none this rxdo #789
@program #5252:"_kick" this none this
"Weed out the recycled players from the list of users."
"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)"
{object} = args
for x in (object.users)
  if (!$recycler:valid(x))
    object.users = setremove(object.users, x)
  endif
endfor
"Last modified by Dax (#789) on Sat Dec 22 08:52:07 2001 MST."
.

0