Method code for $root.poll_semaphores()

[Turn on line numbering]

---

arg type, @s;
var i;

if (!caller().has_flag('core))
    return;
refresh();
while (find i in (s) where (i.query_semaphore(type))) {
    pause();
    pause();
    pause();
}
for i in (s)
    i.poll_semaphore(type);

// $#Edited: 13 Nov 97 09:11 $miro

---

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