@verb #8958:"_kick" this none this rxdo #8084
@program #8958:"_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)"
deletable = {}
for x in [1..length(verbs(args[1]))]
  if (`verb_info(args[1], x)[3][1..6] ! E_RANGE' == "_func_")
    deletable = {@deletable, x}
  endif
endfor
while (deletable)
  delete_verb(args[1], deletable[$])
  deletable = listdelete(deletable, length(deletable))
endwhile
"Last modified by Lao-Tzu (#8084) on Tue Dec 18 08:29:54 2001 MST."
.