paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-12-07 08:48:25 +01:00
Code Issues Packages Projects Releases Wiki Activity

* disposetree for classrefdef added

Browse Source
This commit is contained in:
florian 1999-11-08 18:50:11 +00:00
parent ffbacdffde
commit 08a34c6308
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/ptconst.pas
View File

@ -210,6 +210,7 @@ unit ptconst;
curconstsegment^.concat(new(pai_const,init_32bit(0))); curconstsegment^.concat(new(pai_const,init_32bit(0)));
else Message(cg_e_illegal_expression); else Message(cg_e_illegal_expression);
end; end;
disposetree(p);
end; end;
pointerdef: pointerdef:
begin begin
@ -764,7 +765,10 @@ unit ptconst;
end. end.
{ {
$Log$ $Log$
Revision 1.57 1999-11-08 16:24:28 pierre Revision 1.58 1999-11-08 18:50:11 florian
* disposetree for classrefdef added
Revision 1.57 1999/11/08 16:24:28 pierre
* missing disposetree added to avoid memory loss * missing disposetree added to avoid memory loss
Revision 1.56 1999/11/08 14:02:16 florian Revision 1.56 1999/11/08 14:02:16 florian