浏览代码

* free unbound attributes

git-svn-id: trunk@42407 -
svenbarth 6 年之前
父节点
当前提交
98b1b04951
共有 1 个文件被更改,包括 1 次插入0 次删除
  1. 1 0
      compiler/pdecl.pas

+ 1 - 0
compiler/pdecl.pas

@@ -1109,6 +1109,7 @@ implementation
         consume(_TYPE);
         rtti_attrs_def := nil;
         types_dec(false,had_generic,rtti_attrs_def);
+        rtti_attrs_def.free;
       end;