procedure Assign(VarRep: TypeRepresentation);
extern;

procedure AssignTag(SelectorRep: TypeRepresentation);
extern;