anchor.diff:  end;
   
   function TRawSocket.RecvdCount: Integer;
  -{$IFDEF POSIX}
  -{$ELSE}
  -var
  -  Temp : u_long;
  -{$ENDIF}
  -
  -begin
  -{$IFDEF POSIX}
  -  // nonthing... reserved!
  +begin
  +  // δ
     Result := 0;
  -{$ELSE}
  -  if ioctlsocket(FSocketHandle, FIONREAD, Temp) = SOCKET_ERROR then
  -  begin
  -    Result := -1;
  -  end else
  -  begin
  -    Result := Temp;
  -  end;
  -{$ENDIF}
   end;
   
   procedure TRawSocket.SetConnectInfo(const pvAddr: string; pvPort: Integer);
  
positive.code: {$ENDIF}
  begin
  {$IFDEF POSIX}
    // not test
    FD_ZERO(lvFDSet);
    _FD_SET(FSocketHandle, lvFDSet);
  
  
negative.code: 
      /// <summary>
      ///   Peer Info
      ///    δ
      /// </summary>
      function GetPeerInfo(var vIp: longword; var vPort: Integer): Integer;
  
  