Method code for $mutex._add_to_lock()

[Turn on line numbering]

---

arg tid, val;

if ((| locks[val][1] == tid |))
    locks = locks.add(val, [tid, locks[val][2] + 1]);
else
    locks = locks.add(val, [tid, 1]);

---

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