anchor.diff:          | MSearch of SsdpMSearchMessage
           | Unhandled of content : string
   
  -    module internal SsdpMsgDetails =
  +    //-------------------------------------------------------------------------
  +    // SerDes
  +
  +    module internal SsdpMsgDeserialize =
  +
  +        // Parse message headers ----------------------------------------------
   
           /// Fetches the verb from the string--assuming you're sending the contents
           /// of an SSDP message.
  
positive.code:     open System.Net.Sockets
      open System.Text
  
      type internal MsgReceived = { UdpResult : UdpReceiveResult; Timestamp : DateTimeOffset }
  
      type CacheControl = Dummy
  
      /// Traits of a received SSDP message.
      type SsdpMessageTraits = {
  
negative.code:                                 | None -> msg
                  "CACHE-CONTROL",
                              fun msg value -> msg // TODO #######################
                  "LOCATION", fun msg value -> { msg with Location = value }
                  "NT",       fun msg value -> { msg with ST = value }
                  "NTS",      fun msg value -> { msg with NTS = value }
                  "SERVER",   fun msg value -> { msg with Server = value }
                  "USN",      fun msg value -> { msg with USN = value }
  