program bug3272;
var i: integer;
begin
for i:= -1 downto -2 do
writeln (i);
writeln;
for i:= 1 downto 0 do
writeln (i);
end.Yes, i know this is kinda old and probably solved 100 times before, but i just subscribed and had to see it in action somehow ;-)
> Hi! > Can someone solve this heavy bug below. > Thanks! > > program bug3272; > > var i: integer; > begin > for i:= -1 to -2 do > writeln (i); > writeln; > for i:= 1 to 0 do > writeln (i); > end.
_______________________________________________ fpc-devel maillist - [EMAIL PROTECTED] http://lists.freepascal.org/mailman/listinfo/fpc-devel
