Method code for $foundation.will_inherit()

[Turn on line numbering]

---

arg who;

if (this() != definer() && !sender().has_ancestor(definer()))
    throw(~perm, this() + " may only have parents who are descendants of $foundation");
(> pass(who) <);

---

["// Created 26-Mar-1995 as a part of ColdCore, see: @help Credit"]

Method Ancestry Override:

 !---   36 $foundation.will_inherit(who)
 ----   65 $root.will_inherit(who)