anchor.diff:                      match Microsoft.FSharp.Core.LanguagePrimitives.EnumOfValue<byte, ServerMessage> (a) with
                       | ServerMessage.ReliableString ->
   
  -                        let packet = DesktopPacket (buffer, 1, bytes - 1) :> IPacket
  +                        let packet = DesktopPacket (buffer, 3, bytes - 3) :> IPacket
                           serverPacketReceived.Trigger (packet)
   
                       | _ -> ()
  
positive.code: 
          member this.BroadcastReliableString str =
              let bytes = System.Text.Encoding.UTF8.GetBytes (str)
              let bytes = Array.append [| byte ServerMessage.ReliableString |] bytes 
              lookup
              |> Seq.iter (fun pair ->
                  let (endpoint, connectedClient) = pair.Value
                  udp.Send (bytes, bytes.Length, endpoint :?> IPEndPoint) |> ignore
              )
  
      interface IDisposable with
  
  
negative.code:     let lookup = Dictionary<IPAddress, EndPoint * DesktopConnectedClient> ()
  
      let buffer = Array.zeroCreate<byte> 65536
  
      let mutable reliableStringSequence = 0us
  
      interface IServer with
  
  