Continue with next loop cycle.
Source position: system.fpd line 37
procedure Continue; |
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.
None.
|
Exit current loop construct. |
|
|
Exit current subroutine. |
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; or:=1 to 10 do begin If I<5 Then Continue; Writeln (i); end; end.
{ 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.