@verb #1:"leaves_suspended" this none this rxd #55
@program #1:"leaves_suspended" this none this
"Copied from Object utilities (#53):leaves_suspended by Slacker (#2) Aug 14 18:20:20 1996"
":leaves_suspended(object) => list of all childless descendents of object"
"this versions calls suspend(0) as needed"
set_task_perms(caller_perms())
s = {}
for k in (children(this))
  $command_utils:suspend_if_needed()
  s = {@s, @k:leaves_suspended()}
endfor
return s || {this}
"Last modified by Slacker (#55) on Mon Jun 21 05:46:05 1999 MDT."
"This verb previously owned by manta (#7165), and chowned to $slacker upon dewizarding (Sat Aug 17 14:50:04 2002 MDT)."
"Last modified by Dax (#789) on Sat Aug 17 14:50:04 2002 MDT."
.