anchor.diff:    while Pos <= LineLen do
     begin
       CurChar := Line[Pos];
  -    if CurChar in LeadBytes then
  +    if CharInSet(CurChar, LeadBytes) then
       begin
         Inc(Pos);
         Inc(Col);
  
positive.code:     begin
        Inc(ALine);
        while (ALine < Count) and ((Length(Get(ALine)) > 0) and
          (Get(ALine)[1] in LWS)) do
        begin
          if (Result[Length(Result)] in LWS) then
          begin
            Result := Result + TrimLeft(Get(ALine))
          end
  
negative.code:  *                                                        *
   * hprose synapse http client unit for delphi.            *
   *                                                        *
   * LastModified: Jun 12, 2016                             *
   * Author: Ma Bingyao <andot@hprose.com>                  *
   *                                                        *
  \**********************************************************/
  