Module CommunicationSource

Sourcetype payload =
  1. | State of int * [ `Fast | `Normal ]
  2. | Ready
  3. | Open_speaker_notes
  4. | Close_speaker_notes
  5. | Speaker_notes of string
  6. | Drawing of string
  7. | Send_all_drawing
  8. | Receive_all_drawing of string list
Sourcetype t = {
  1. payload : payload;
  2. id : string;
}
Sourceval of_string : string -> t option
Sourceval to_string : t -> string