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
  15. | Can_gui
  16. | ActivateGUI of Common_types.gui_id
  17. | DeActivateGUI
  18. | SaveCoordinates of {
    1. id : Common_types.gui_id;
    2. x : int option;
    3. y : int option;
    4. w : int option;
    5. h : int option;
    6. scale : float option;
    }
  19. | GotoLoc of Common_types.gui_id
Sourcetype t = {
  1. payload : payload;
  2. id : string;
}
Sourceval of_string : string -> t option
Sourceval to_string : t -> string