Explorar o código

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

git-svn-id: trunk@29771 -
florian %!s(int64=10) %!d(string=hai) anos
pai
achega
ba3f0281b0
Modificáronse 1 ficheiros con 2 adicións e 0 borrados
  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