Browse Source

* reverted r22849, the mem-leak only occured in case of an error that is not catched

git-svn-id: branches/joost/classattributes@22964 -
joost 13 years ago
parent
commit
aa9940683b
1 changed files with 0 additions and 1 deletions
  1. 0 1
      compiler/pdecl.pas

+ 0 - 1
compiler/pdecl.pas

@@ -399,7 +399,6 @@ implementation
           oldblock_type := block_type;
           block_type := bt_body;
           do_member_read(od,false,constrpd.procsym,p1,again,[]);
-          p1.Free;
           block_type:=oldblock_type;
 
           { Add attribute to attribute list which will be added