Module CommunicationSource

Sourcetype payload =
  1. | State of int * [ `Fast | `Normal ]
  2. | Ready
  3. | Open_speaker_notes
  4. | Close_speaker_notes
  5. | Open_recording_panel
  6. | Close_recording_panel
  7. | Speaker_notes of string
  8. | Drawing of string
  9. | Send_all_drawing
  10. | Receive_all_drawing of string list
  11. | Save_drawing of string * string
  12. | Next
  13. | Previous
  14. | Can_save
Sourcetype t = {
  1. payload : payload;
  2. id : string;
}
Sourceval of_string : string -> t option
Sourceval to_string : t -> string