Method code for $root._clean_root()

[Turn on line numbering]

---

arg v, m;
var obj, value;

if ((value = get_var(v))) {
    value = value.valid_objects();
    for obj in (value) {
        if (!(this() in obj.(m)()))
            value = value.setremove(obj);
        refresh();
    }
    if (value)
        set_var(v, value);
    else
        clear_var(v);
}

---

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