public override void CaseTTInteger(TTInteger node)
{
index = 1;
}
internal override void RemoveChild(Node child)
{
if ( _t_integer_ == child )
{
_t_integer_ = null;
return;
}
}
public AIntegerSexp(
TTInteger _t_integer_
)
{
SetTInteger (_t_integer_);
}
public void SetTInteger(TTInteger node)
{
if(_t_integer_ != null)
{
_t_integer_.Parent(null);
}
if(node != null)
{
if(node.Parent() != null)
{
node.Parent().RemoveChild(node);
}
node.Parent(this);
}
_t_integer_ = node;
}
public virtual void CaseTTInteger(TTInteger node)
{
DefaultCase(node);
}