Compilerbugs ohne Ende

[Nils_13]

Delphi-Quellcode:

    // Commands <-- die Fehlerzeile (sagt der Parser). Immer 11 Zeilen drüber.
    if l = 'jmp' then 
    begin
      for i := g to cA.Lines.Count do
        if cA.Lines[i] = nl then
        begin
          findpos := i;
          Break;
        end;
      for i := g to findpos do
      begin
        asdghjkasdghkasjdghasdz <-- Fehler
      end;
    end;