瀏覽代碼

* don't free the constructor call in trtti_attribute_list as that is already freed in the destructor of trtti_attribute

git-svn-id: trunk@42406 -
svenbarth 6 年之前
父節點
當前提交
90bec938f6
共有 1 個文件被更改,包括 0 次插入7 次删除
  1. 0 7
      compiler/symdef.pas

+ 0 - 7
compiler/symdef.pas

@@ -3046,14 +3046,7 @@ implementation
 
 
 
 
     destructor trtti_attribute_list.destroy;
     destructor trtti_attribute_list.destroy;
-      var
-        i : longint;
       begin
       begin
-        { if the attributes are not bound we need to free their generated
-          constructor functions as well }
-        if not is_bound and assigned(rtti_attributes) then
-          for i:=0 to rtti_attributes.count-1 do
-            trtti_attribute(rtti_attributes[i]).constructorcall.free;
         rtti_attributes.Free;
         rtti_attributes.Free;
         inherited destroy;
         inherited destroy;
       end;
       end;