anchor.diff:   *                                                        *
    * ObjAutoX unit for delphi.                              *
    *                                                        *
  - * LastModified: Oct 30, 2016                             *
  + * LastModified: Nov 13, 2016                             *
    * Author: Ma Bingyao <andot@hprose.com>                  *
    *                                                        *
   \**********************************************************/
  
positive.code:       Inc(PCardinal(MethodInfo));
        {$ELSE}
        Count := PWord(MethodInfo)^;
        Inc(PWord(MethodInfo));
        {$ENDIF}
        while Count > 0 do begin
          Result[I] := MethodInfo;
  
negative.code:         {$IFDEF FPC}
          Inc(Result);
          {$ELSE}
          Inc(NativeUInt(Result), Result^.Len);
          {$ENDIF}
          Dec(Count);
        end;
  