Selaa lähdekoodia

* fix compilation errors with -O2 due to dfa based warnings

git-svn-id: trunk@29771 -
florian 10 vuotta sitten
vanhempi
commit
ba3f0281b0
1 muutettua tiedostoa jossa 2 lisäystä ja 0 poistoa
  1. 2 0
      compiler/pexpr.pas

+ 2 - 0
compiler/pexpr.pas

@@ -2196,6 +2196,7 @@ implementation
                      if isspecialize or (token=_ID) then
                        begin
                          erroroutp1:=true;
+                         srsym:=nil;
                          structh:=tabstractrecorddef(p1.resultdef);
                          if isspecialize then
                            begin
@@ -2368,6 +2369,7 @@ implementation
                       if isspecialize or (token=_ID) then
                         begin
                           erroroutp1:=true;
+                          srsym:=nil;
                           structh:=tobjectdef(p1.resultdef);
                           if isspecialize then
                             begin