/
CDC-1.2b/
CDC-1.2b/src/
parent $lock_class
object $inside_lock

var $root child_index 0
var $root fertile 0
var $root manager $inside_lock
var $root owners [$inside_lock]
var $root writable [$inside_lock]
var $root readable ['parameters, 'methods, 'code]
var $root trusted []
var $root owned [$inside_lock]
var $root inited 1
var $root dbref 'inside_lock

method test
    arg objlist, testee, [args];
    var x;
    
    for x in (objlist) {
        if (x.contains(testee))
            return 1;
    }
    return 0;
.