Opóngase la Relación:::: Meta:: el Tipo es un Objeto:: validación de tipo de Datos de Relación y edificio de accessor.

Sinopsis

Opóngase la Relación:::: Meta:: Tipo-> añaden (
tecla => "estado",
llame => "estado",
constructor => Objeto:: Relación:: Meta:: AccessorBuilder,
¿materia prima => suscripción {en cuanto a $ _ [0]? cambio-> valor: cambie},
store_raw => suscripción {cambio-> store_value},
compruebe => suscripción {
:: uNIVERSAL isa ($ _ [0], Opóngase la Relación:::: DataType:: estado)
o el throw_invalid ([el Valor "[_1]" no es un válido [_2] objeto,
$ _ [0], Opóngase la Relación:::: DataType:: estado]);
el throw_invalid ([no Puede adjudicar el estado permanente])
si $ _ [0] == Object::Relation::DataType::State->PERMANENT;
}
);

Esta Clase de subclases de clase:: Meta:: Tipo para proporcionar atributos adicionales. Estos atributos pueden ser opcionalmente puestos vía la llamada a nuevo (), y pueden ser traídos vía su accessors.