anchor.diff:      raise Exception.Create('unexpected EOF');
     N := Length(Data);
     if Data[N - 1] <> HproseTagEnd then
  -    raise Exception.Create('Wrong Response: ' + #13#10 + StringOf(Data));
  +    raise Exception.Create('Wrong Response: ' + #13#10 + string(StringOf(Data)));
     Result := Null;
     if Settings.Mode = RawWithEndTag then Result := Data
     else if Settings.Mode = Raw then begin
  
positive.code:         end
        end
        else if ATag = HproseTagError then
          raise Exception.Create(HproseReader.ReadString());
        if ATag <> HproseTagEnd then
          raise Exception.Create('Wrong Response: ' + #13#10 + StringOf(Data));
      finally
        HproseReader.Free;
        InStream.Free;
  
negative.code:   HproseWriter := THproseWriter.Create(OutStream, Settings.Simple);
    try
      OutStream.Write(HproseTagCall, 1);
      HproseWriter.WriteString(WideString(AName));
      if (Length(Args) > 0) or Settings.ByRef then begin
        HproseWriter.Reset;
        HproseWriter.WriteArray(Args);
  