]> matita.cs.unibo.it Git - helm.git/commitdiff
allows auto before eq is defined
authorEnrico Tassi <enrico.tassi@inria.fr>
Wed, 28 Jul 2010 16:43:39 +0000 (16:43 +0000)
committerEnrico Tassi <enrico.tassi@inria.fr>
Wed, 28 Jul 2010 16:43:39 +0000 (16:43 +0000)
helm/software/components/ng_tactics/nnAuto.ml

index c1b5c302f2b5a27147eff1c629c4558fca12f516..344e7535c2614e2d971cd798326f9fba918a760d 100644 (file)
@@ -578,6 +578,8 @@ let smart_apply t unit_eq status g =
         debug_print(lazy("goal " ^ (NCicPp.ppterm ctx [] [] jty)));
         fast_eq_check unit_eq status j
     with
+      | NCicEnvironment.ObjectNotFound s as e ->
+          raise (Error (lazy "eq_coerc non yet defined",Some e))
       | Error _ as e -> debug_print (lazy "error"); raise e
 
 let smart_apply_tac t s =