mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-09-08 06:21:15 +02:00
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 -
This commit is contained in:
parent
99615264c5
commit
114dfe41a3
@ -2411,6 +2411,7 @@ implementation
|
||||
erroroutp1:=true;
|
||||
if token=_ID then
|
||||
begin
|
||||
srsym:=nil;
|
||||
structh:=tobjectdef(tclassrefdef(p1.resultdef).pointeddef);
|
||||
if isspecialize then
|
||||
begin
|
||||
|
Loading…
Reference in New Issue
Block a user