anchor.diff:   *                                                        *
    * hprose synapse http client unit for delphi.            *
    *                                                        *
  - * LastModified: Jun 25, 2014                             *
  + * LastModified: Jun 12, 2016                             *
    * Author: Ma Bingyao <andot@hprose.com>                  *
    *                                                        *
   \**********************************************************/
  
positive.code:         QuoteChar := CurChar;
      Inc(Pos);
      Inc(Col);
      if not (QuoteChar in QuoteChars) and (ExistingBreak or
        ((Col > MaxCol) and (BreakPos > LinePos))) then
      begin
        Col := Pos - BreakPos;
        Result := Result + Copy(Line, LinePos, BreakPos - LinePos + 1);
        if not (CurChar in QuoteChars) then
          while (Pos <= LineLen) and (Line[Pos] in BreakChars + [#13, #10]) do
            Inc(Pos);
        if not ExistingBreak and (Pos < LineLen) then
          Result := Result + BreakStr;
  
negative.code:       end
      end
      else
        if CharInSet(CurChar, BreakChars) then
      begin
        if QuoteChar = ' ' then
          BreakPos := Pos
      end
      else
        if CharInSet(CurChar, QuoteChars) then
        if CurChar = QuoteChar then
          QuoteChar := ' '
        else
  