TOKEN_OBJECT
*object_type |= TOKEN_OBJECT;
if (object_type & TOKEN_OBJECT)
object_p->object_type |= TOKEN_OBJECT;
attr_mask = (obj->object_type) & TOKEN_OBJECT;