Переглянути джерело

Added iioffset for _IMPLEMENTS. added iitype initializer

git-svn-id: trunk@4358 -
chrivers 19 роки тому
батько
коміт
97e0ff4105
1 змінених файлів з 2 додано та 0 видалено
  1. 2 0
      compiler/symdef.pas

+ 2 - 0
compiler/symdef.pas

@@ -248,6 +248,7 @@ interface
           iidguid: pguid;
           iidstr: pstring;
           iitype: tinterfaceentrytype;
+          iioffset: longint;
           lastvtableindex: longint;
           { store implemented interfaces defs and name mappings }
           implementedinterfaces: timplementedinterfaces;
@@ -4262,6 +4263,7 @@ implementation
         else
           implementedinterfaces:=nil;
         writing_class_record_dbginfo:=false;
+        iitype := etStandard;
      end;