virtual void SetAllContinue( ProgNodeP target)
{
if( down != NULL && !keepDown)
{
down->SetAllContinue( target);
}
if( right != NULL && !keepRight)
{
right->SetAllContinue( target);
}
}
FOR_LOOPNode( ProgNodeP r, ProgNodeP d): BreakableNode()
{
SetType( GDLTokenTypes::FOR_LOOP, "for_loop");
SetRightDown( r, d);
assert( down != NULL);
statementList = this->GetStatementList();
if( statementList != NULL)
{
statementList->SetAllContinue( this);
statementList->GetLastSibling()->KeepRight( this);
// also NULL is fine for "right" when the FOR statement
// is the last in the subroutine
// it is important, that breakTargetSet is set hence
// this call must be done even with right == NULL
statementList->SetAllBreak( right);
// if( right != NULL) statementList->SetAllBreak( right);
}
else
{
down->KeepRight( this);
statementList = this;
}
}
WHILENode( const RefDNode& refNode): BreakableNode( refNode)
{
assert( down != NULL);
// down->GetLastSibling()->KeepRight( this); // for empty body
ProgNodeP statementList = this->GetStatementList();
if( statementList != NULL)
{
statementList->SetAllContinue( this);
// must be called even with right == NULL, see FOR_LOOPNode
statementList->SetAllBreak( right);
// if( right != NULL) statementList->SetAllBreak( right);
statementList->GetLastSibling()->KeepRight( this); // for empty body
}
}
REPEAT_LOOPNode( ProgNodeP r, ProgNodeP d): BreakableNode()
{
SetType( GDLTokenTypes::REPEAT_LOOP, "repeat_loop");
SetRightDown( r, d);
assert( down != NULL);
ProgNodeP statementList = this->GetStatementList();
if( statementList != NULL)
{
statementList->SetAllContinue( this);
statementList->GetLastSibling()->KeepRight( this);
// must be called even with right == NULL, see FOR_LOOPNode
statementList->SetAllBreak( right);
// if( right != NULL) statementList->SetAllBreak( right);
}
}