anchor.diff:      // IInvokeableVarObject method
       function Invoke(const AName: string;
         const Arguments: TVarDataArray): Variant; overload;
  -{$IFDEF SUPPORTS_GENERICS}
  +{$IFDEF SUPPORTS_ANONYMOUS_METHOD}
       // Synchronous invoke
       function Invoke<T>(const AName: string;
         const ASettings: IInvokeSettings = nil): T; overload;
  
positive.code:  *                                                        *
   * hprose client unit for delphi.                         *
   *                                                        *
   * LastModified: Nov 23, 2016                             *
   * Author: Ma Bingyao <andot@hprose.com>                  *
   *                                                        *
  \**********************************************************/
  
negative.code:     function GetFullName(const AName: string): string;
      procedure SetURI(const AValue: string);
      procedure ByValue(var Arguments: TVariants);
  {$IFDEF SUPPORTS_ANONYMOUS_METHOD}
      procedure VarToT(Info: PTypeInfo; const Src: Variant; out Dst);
      function VarTo<T>(const AValue: Variant): T;
  {$ENDIF}
  