Sfoglia il codice sorgente

* free unbound attributes

git-svn-id: trunk@42407 -
svenbarth 6 anni fa
parent
commit
98b1b04951
1 ha cambiato i file con 1 aggiunte e 0 eliminazioni
  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;