Kaynağa Gözat

Don't try to export generics.

pkgutil.pas, exportabstractrecorddef:
  * if it's a generic then leave before iterating the nested types

git-svn-id: trunk@33963 -
svenbarth 9 yıl önce
ebeveyn
işleme
fa4690eef8
1 değiştirilmiş dosya ile 1 ekleme ve 1 silme
  1. 1 1
      compiler/pkgutil.pas

+ 1 - 1
compiler/pkgutil.pas

@@ -135,10 +135,10 @@ implementation
       { for cross unit type aliases this might happen }
       if def.owner<>symtable then
         exit;
-      def.symtable.SymList.ForEachCall(@exportabstractrecordsymproc,def.symtable);
       { don't export generics or their nested types }
       if df_generic in def.defoptions then
         exit;
+      def.symtable.SymList.ForEachCall(@exportabstractrecordsymproc,def.symtable);
       if (def.typ=objectdef) and (oo_has_vmt in tobjectdef(def).objectoptions) then
         begin
           hp:=texported_item.create;