mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-07 23:06:11 +02:00
* remove a memory leak with resourcestrings
This commit is contained in:
parent
68dd25c7ae
commit
a7de7fd247
@ -1701,7 +1701,7 @@
|
|||||||
destructor tconstsym.done;
|
destructor tconstsym.done;
|
||||||
begin
|
begin
|
||||||
case consttyp of
|
case consttyp of
|
||||||
conststring :
|
conststring,constresourcestring :
|
||||||
freemem(pchar(value),len+1);
|
freemem(pchar(value),len+1);
|
||||||
constreal :
|
constreal :
|
||||||
dispose(pbestreal(value));
|
dispose(pbestreal(value));
|
||||||
@ -2137,7 +2137,10 @@
|
|||||||
|
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.141 2000-04-03 14:50:05 pierre
|
Revision 1.142 2000-04-19 08:24:41 pierre
|
||||||
|
* remove a memory leak with resourcestrings
|
||||||
|
|
||||||
|
Revision 1.141 2000/04/03 14:50:05 pierre
|
||||||
* avoid cyclic overloaded list for operators
|
* avoid cyclic overloaded list for operators
|
||||||
|
|
||||||
Revision 1.140 2000/03/01 00:03:10 pierre
|
Revision 1.140 2000/03/01 00:03:10 pierre
|
||||||
|
Loading…
Reference in New Issue
Block a user