paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-03 16:29:27 +01:00
Code Issues Packages Projects Releases Wiki Activity

* fixed crashing bug in unit reference counting

Browse Source
This commit is contained in:
Jonas Maebe 2001-10-12 20:27:43 +00:00
parent 5d6cfe797c
commit 9a5955d79f
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
compiler/symtable.pas
View File

@ -616,6 +616,7 @@ implementation
((aktprocsym.definition.options and postaticmethod)<>0)} then
Message(sym_e_only_static_in_static);
if (unitid<>0) and
(symtabletype = globalsymtable) and
assigned(tglobalsymtable(self).unitsym) then
inc(tglobalsymtable(self).unitsym.refs);
@ -2103,7 +2104,10 @@ implementation
end.
{
$Log$
Revision 1.46 2001-09-30 21:29:47 peter
Revision 1.47 2001-10-12 20:27:43 jonas
* fixed crashing bug in unit reference counting
Revision 1.46 2001/09/30 21:29:47 peter
* gdb fixes merged
Revision 1.45 2001/09/19 11:06:03 michael