- Disambiguation error exception enriched with more information

[helm.git] / helm / software / components / grafite_parser / grafiteDisambiguator.mli

diff --git a/helm/software/components/grafite_parser/grafiteDisambiguator.mli b/helm/software/components/grafite_parser/grafiteDisambiguator.mli
index 78b0353d8c1b4391d6aed0dc149fe689e9dc7d49..1b63690d77838c380877c89f80c7da5543bfeb55 100644 (file)
--- a/helm/software/components/grafite_parser/grafiteDisambiguator.mli
+++ b/helm/software/components/grafite_parser/grafiteDisambiguator.mli
@@ -28,8 +28,11 @@
 exception Ambiguous_input
 (* the integer is an offset to be added to each location *)
 exception DisambiguationError of
- int * ((DisambiguateTypes.domain_item * DisambiguateTypes.codomain_item) list *
- Token.flocation option * string Lazy.t) list list
+ int *
+ ((Token.flocation list * string * string) list *
+  (DisambiguateTypes.domain_item * DisambiguateTypes.codomain_item) list *
+  Token.flocation option * string Lazy.t) list list
+  (** parameters are: option name, error message *)
 
 (** initially false; for debugging only (???) *)
 val only_one_pass: bool ref