Added Interface implementation type specifier (var: iitype) to tobjectdef. Used for the implementation of "implements"-keyword

git-svn-id: trunk@4352 -

compiler/symdef.pas

@@ -247,6 +247,7 @@ interface
           objecttype : tobjectdeftype;
           iidguid: pguid;
           iidstr: pstring;
+          iitype: tinterfaceentrytype;
           lastvtableindex: longint;
           { store implemented interfaces defs and name mappings }
           implementedinterfaces: timplementedinterfaces;