Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*)
+open Printf;;
+
+let debug = ref false
+let debug_print s =
+ if !debug then
+ prerr_endline (sprintf "DEBUG: %s" s)
+
exception Invalid_HTTP_version of string
exception Invalid_code of int
exception Invalid_status of Http_types.status