open Hbugs_types;;
exception Parse_error of string * string (* parsing subject, reason *)
+exception Unexpected_message of message;;
val msg_of_string: string -> message
val string_of_msg: message -> string
val submit_req: url:string -> message -> message
+ (** close outchan afterwards *)
val respond_msg: message -> out_channel -> unit
+ (** close outchan afterwards *)
(* exception_name, exception_value, output_channel *)
val respond_exc: string -> string -> out_channel -> unit
+(* TODO the below functions are for debugging only and shouldn't be exposed *)
+val parse_state:
+ ('a Pxp_document.node Pxp_document.extension as 'a) Pxp_document.node ->
+ (string * string * int)
+val pp_state: (string * string * int) option -> string
+