All the equalityTactics have now been ported to use both the equality of

[helm.git] / helm / ocaml / getter / http_getter_types.ml

diff --git a/helm/ocaml/getter/http_getter_types.ml b/helm/ocaml/getter/http_getter_types.ml
index 172cf18a963e3f2cea18aa586e9347b022f5b6d3..1574e2bdb12e4249a82a421602194325dbc343ae 100644 (file)
--- a/helm/ocaml/getter/http_getter_types.ml
+++ b/helm/ocaml/getter/http_getter_types.ml
@@ -34,6 +34,9 @@ exception Invalid_RDF_class of string
 exception Internal_error of string
 exception Cache_failure of string
 exception Dtd_not_found of string (* dtd's url *)
+exception Key_already_in of string;;
+exception Key_not_found of string;;
+exception Http_client_error of string * string  (* url, error message *)
 
 type encoding = [ `Normal | `Gzipped ]
 type answer_format = [ `Text | `Xml ]