X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2FmatitaExcPp.ml;h=24981af6bc6e754b4595b9b04614a26b478ea050;hb=f06968e452cca8782e822d98bec9007404abcbbe;hp=14e7a0db8777adcea5f59fa871c9fc725ba04222;hpb=94267002fc18aa42a8c09779ad6485f93c3e90fa;p=helm.git

diff --git a/matita/matitaExcPp.ml b/matita/matitaExcPp.ml
index 14e7a0db8..24981af6b 100644
--- a/matita/matitaExcPp.ml
+++ b/matita/matitaExcPp.ml
@@ -147,6 +147,8 @@ let rec to_string =
      None, "Already defined: " ^ UriManager.string_of_uri s
   | CoercDb.EqCarrNotImplemented msg ->
      None, ("EqCarrNotImplemented: " ^ Lazy.force msg)
+  | MatitaEngine.EnrichedWithLexiconStatus (exn,_) ->
+     None, "EnrichedWithLexiconStatus "^snd(to_string exn)
   | GrafiteDisambiguator.DisambiguationError (offset,errorll) ->
      let loc =
       match errorll with