From: Claudio Sacerdoti Coen Date: Tue, 13 May 2008 17:31:40 +0000 (+0000) Subject: More exceptions captured. X-Git-Tag: make_still_working~5220 X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=commitdiff_plain;h=6c69642637b666508e22355a81d16d92576b1617;p=helm.git More exceptions captured. --- diff --git a/helm/software/components/ng_kernel/check.ml b/helm/software/components/ng_kernel/check.ml index 6bc725033..dde581788 100644 --- a/helm/software/components/ng_kernel/check.ml +++ b/helm/software/components/ng_kernel/check.ml @@ -128,7 +128,8 @@ let _ = with | NCicTypeChecker.AssertFailure s | NCicTypeChecker.TypeCheckerFailure s - | NCicEnvironment.ObjectNotFound s as e -> + | NCicEnvironment.ObjectNotFound s + | NCicEnvironment.BadDependency s as e -> prerr_endline ("######### " ^ Lazy.force s); if not ignore_exc then raise e )