Continue
Continue with next loop cycle.
Declaration
Source position: system.fpd line 37
procedure Continue;
Description
Continue jumps to the end of the current repetitive statement. The code between the Continue call and the end of the repetitive statement is skipped. The condition of the repetitive statement is then checked again.
This can be used with For, repeat and While statements.
Note that although Continue is a compiler intrinsic (i.e. is treated specially) it is defined as an identifier in the system unit, hence it can be redefined.
Errors
None.
See also
Name | Description |
---|---|
Break | Exit current loop construct. |
Exit | Exit current subroutine. |
Example
Program Example86;
{ Program to demonstrate the Continue function. }
Var I : longint;
begin
I:=0;
While I<10 Do
begin
Inc(I);
If I<5 Then
Continue;
Writeln (i);
end;
I:=0;
Repeat
Inc(I);
If I<5 Then
Continue;
Writeln (i);
Until I>=10;
For I:=1 to 10 do
begin
If I<5 Then
Continue;
Writeln (i);
end;
end.
Example
{
Example 121:
Continue, break and exit are system procedures.
They can be redefined
}
procedure continue;
begin
Writeln('Continue');
end;
Procedure Exit;
begin
Writeln('exit');
end;
Procedure Break;
begin
Writeln('Break');
end;
begin
Repeat
Continue;
Break;
exit;
Until True;
end.