1 2 3 4 5 6 7 8 9
{ %fail } { %opt=-O3 } var a : integer; begin for a := 1 to 1 do for a := 1 to a do end; end.