paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-29 14:40:25 +02:00
Code Issues Packages Projects Releases Wiki Activity

* properly count references to overloaded operators (tests/tbs/tb0500.pp)

Browse Source 
git-svn-id: trunk@3204 -
This commit is contained in:
Jonas Maebe 2006-04-14 09:12:48 +00:00
parent 7d8aa405b1
commit 5e02b02d24
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
compiler/htypechk.pas
View File

@ -474,7 +474,7 @@ implementation
end; end;
candidates.free; candidates.free;
inc(operpd.procsym.refs); addsymref(operpd.procsym);
{ the nil as symtable signs firstcalln that this is { the nil as symtable signs firstcalln that this is
an overloaded operator } an overloaded operator }
@ -620,7 +620,7 @@ implementation
end; end;
candidates.free; candidates.free;
inc(operpd.procsym.refs); addsymref(operpd.procsym);
{ the nil as symtable signs firstcalln that this is { the nil as symtable signs firstcalln that this is
an overloaded operator } an overloaded operator }