@verb #1:"branches" this none this rxd #55
@program #1:"branches" this none this
":branches(object) => list of all descendants of object which have children."
if (kids = children(this))
  s = {this}
  for k in (kids)
    s = {@s, @k:branches()}
  endfor
  return s
else
  return {}
endif
"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."
.