Browse Source

* Memory leak fixed.

daniel 27 years ago
parent
commit
13fa23a76e
1 changed files with 5 additions and 1 deletions
  1. 5 1
      compiler/pdecl.pas

+ 5 - 1
compiler/pdecl.pas

@@ -137,6 +137,7 @@ unit pdecl;
                       else Message(cg_e_illegal_expression);
                       else Message(cg_e_illegal_expression);
                    end;
                    end;
                    consume(SEMICOLON);
                    consume(SEMICOLON);
+                   disposetree(p);
                 end;
                 end;
               COLON:
               COLON:
                 begin
                 begin
@@ -2037,7 +2038,10 @@ unit pdecl;
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.54  1998-09-17 13:41:16  pierre
+  Revision 1.55  1998-09-21 13:24:44  daniel
+  * Memory leak fixed.
+
+  Revision 1.54  1998/09/17 13:41:16  pierre
   sizeof(TPOINT) problem
   sizeof(TPOINT) problem
 
 
   Revision 1.53.2.1  1998/09/17 13:12:09  pierre
   Revision 1.53.2.1  1998/09/17 13:12:09  pierre