anchor.diff: -﻿// Weitere Informationen zu F# unter "http://fsharp.net".
  -
  +﻿/// Implementation of the following protokoll: 
  +/// sending messages with: <id> <command> <parameter> RAWDATA <bytecount>\0<rawbytes>
  +/// or <id> <command> <parameter>\0
  +/// \ has to be escaped to \\ in <parameter>, <command>
  +/// " " has to be escaped to "\ " in <parameter>, <command>
  +/// \0 has to be escaped in "\0" everywhere but <rawbytes>
  +/// <id> is a unique byte array with all bytes > 0x20 (which is the space character)
  +///
  +/// The Parter can answer a command with 
  +/// <id> _ <parameter> RAWDATA <bytecount>\0<rawbytes>
  +/// or
  +/// <id> _ <parameter>\0
  +/// Where <id> is the same as the matching first message
   
   module MyMessageProcessor
   
  
positive.code: open System.Net.Sockets
  open System.Collections.Generic
  open System.Diagnostics
  
  
  open SocketHelper
  
  
negative.code: let myprint fmt = 
    Printf.kprintf printer.Post fmt
  
  
  type RawData = {
      Bytes : byte array
      Size  : int
  