[fpc-devel] RTTI

[Alfred]

Delphi XE8 (System.TypInfo):

   TIntfMethodEntryTail = packed record
     Kind: Byte; // 0=proc or 1=func
     CC: TCallConv;
     ParamCount: Byte;
    {Params: array[1..ParamCount] of TIntfMethodParam;
     ResultTypeName: string; // only if func
     ResultType: PPTypeInfo; // only if Len(Name) > 0
     AttrData: TAttrData;}
   end;