Method code for $sys._loop_for_core()

[Turn on line numbering]

---

arg code;
var obj;

$root.add_method(code, '___coretmp);
for obj in ($root.descendants()) {
    obj.___coretmp();
    pause();
}
$root.del_method('___coretmp);

---

// Created 27-Mar-1995 as a part of ColdCore, see: @help Credit