Browse Source

Fix for Mantis #28741.

pexpr.pas:
  * initialize srsym in the classrefdef case; it should not have let to problems, because it's only used if erroroutp1 is false which is only the case if the symbol is assigned, but better save then sorry...

git-svn-id: trunk@31887 -
svenbarth 10 years ago
parent
commit
114dfe41a3
1 changed files with 1 additions and 0 deletions
  1. 1 0
      compiler/pexpr.pas

+ 1 - 0
compiler/pexpr.pas

@@ -2411,6 +2411,7 @@ implementation
                       erroroutp1:=true;
                       if token=_ID then
                         begin
+                          srsym:=nil;
                           structh:=tobjectdef(tclassrefdef(p1.resultdef).pointeddef);
                           if isspecialize then
                             begin