Method code for $root.release_semaphore()

[Turn on line numbering]

---

arg type;

if ((| semaphores[type] == task_id() |))
    semaphores = dict_del(semaphores, type);
if (!semaphores)
    clear_var('semaphores);

// $#Edited: 13 Nov 97 04:54 $miro

---

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