diff src/CpdtTactics.v @ 417:539ed97750bb

Update for Coq trunk version intended for final 8.4 release
author Adam Chlipala <adam@chlipala.net>
date Tue, 17 Jul 2012 16:37:58 -0400
parents 76e1dfcb86eb
children ed829eaa91b2
line wrap: on
line diff
--- a/src/CpdtTactics.v	Wed Jun 13 11:14:00 2012 -0400
+++ b/src/CpdtTactics.v	Tue Jul 17 16:37:58 2012 -0400
@@ -214,7 +214,7 @@
   let x := fresh "x" in
     remember E as x; simpl in x; dependent destruction x;
       try match goal with
-            | [ H : _ = E |- _ ] => rewrite <- H in *; clear H
+            | [ H : _ = E |- _ ] => try rewrite <- H in *; clear H
           end.
 
 (** Nuke all hypotheses that we can get away with, without invalidating the goal statement. *)