parent $utilities
object $vddl_stnd

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

method boolean
    arg what, [typ];
    
    typ = [@typ, 'integer][1];
    .debug(typ, type(typ));
    .debug(what, type(what));
    if (what == 'true) {
        if (typ == 'string)
            return "1";
        else if (typ == 'integer)
            return 1;
    } else if (what == 'false) {
        if (typ == 'string)
            return "0";
        else if (typ == 'integer)
            return 0;
    }
    return -1;
.