mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-10 01:46:58 +02:00
* missing disposetree added to avoid memory loss
This commit is contained in:
parent
cb390de93b
commit
a4926e2d26
@ -642,6 +642,7 @@ unit ptconst;
|
||||
end
|
||||
else
|
||||
Message(cg_e_illegal_expression);
|
||||
disposetree(p);
|
||||
end;
|
||||
{ reads a typed constant record }
|
||||
recorddef:
|
||||
@ -763,7 +764,10 @@ unit ptconst;
|
||||
end.
|
||||
{
|
||||
$Log$
|
||||
Revision 1.56 1999-11-08 14:02:16 florian
|
||||
Revision 1.57 1999-11-08 16:24:28 pierre
|
||||
* missing disposetree added to avoid memory loss
|
||||
|
||||
Revision 1.56 1999/11/08 14:02:16 florian
|
||||
* problem with "index X"-properties solved
|
||||
* typed constants of class references are now allowed
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user