View/Edit #1:branches_suspended

Switch to edit mode.

Name(s): branches_suspended
1:  "object:branches_suspended() => descendants of object having children."
2:  "this version calls suspend(0) as needed"
3:  if (kids = children(this))
4:    s = {this}
5:    for k in (kids)
6:      $command_utils:suspend_if_needed()
7:      s = {@s, @k:branches_suspended()}
8:    endfor
9:    return s
10: else
11:   return {}
12: endif
13: "Last modified by Slacker (#55) on Mon Jun 21 05:46:05 1999 MDT."
14: "This verb previously owned by manta (#7165), and chowned to $slacker upon dewizarding (Sat Aug 17 14:50:04 2002 MDT)."
15: "Last modified by Dax (#789) on Sat Aug 17 14:50:04 2002 MDT."

Verb arguments: this none this
Verb perms: Readable eXecutable NOT-Debug
Verb owned by: Slacker (#55)

You are not logged in.

[home | help | who | search | setup | code]