[fpc-devel]bug3272

[rstar at mnet-online.de]

NB: Delphi has a hint for those cases:

1.pas(5) Hint: FOR or WHILE loop executes zero times - deleted
1.pas(8) Hint: FOR or WHILE loop executes zero times - deleted


 >program  bug3272;
 >
 >var i: integer;
 >begin
 >for i:= -1 to -2 do
 >    writeln (i);
 > writeln;
 > for i:= 1 to 0 do
 >    writeln (i);
 >end.