Browse Source

Added iioffset for _IMPLEMENTS. added iitype initializer

git-svn-id: trunk@4358 -
chrivers 19 years ago
parent
commit
97e0ff4105
1 changed files with 2 additions and 0 deletions
  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;