On Mon, 1 Jul 2019 13:37:54 -0400, "James Richters"
<ja...@productionautomation.net> wrote:

>For X := 1 to 10 do
>   Begin
>       If somethingmakesmewanttoexit then
>            X:=10;
>       If somethinmakesmewanttoskipthenextthing then
>           Inc(X);
>   End;

Why not:
For X := 1 to 10 do
   Begin
       If somethingmakesmewanttoexit then
            break;
       If somethinmakesmewanttoskipthenextthing then
           continue;
       Regularprocessing;
   End;



-- 
Bo Berglund
Developer in Sweden

_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Reply via email to