Przeglądaj źródła

* fixed skipping of character after number of errors to report in
parsing of -Se<xxx> string (mantis #10849)

git-svn-id: trunk@10362 -

Jonas Maebe 17 lat temu
rodzic
commit
e9108ed51c
1 zmienionych plików z 1 dodań i 1 usunięć
  1. 1 1
      compiler/verbose.pas

+ 1 - 1
compiler/verbose.pas

@@ -436,7 +436,7 @@ implementation
                   if code<>0 then
                    l:=1;
                   status.maxerrorcount:=l;
-                  i:=j;
+                  i:=j-1;
                 end;
               'w','W' :
                 status.errorwarning:=true;