From 84117b9db991c0cf25d3cbdc5bfb798c05a9d3ea Mon Sep 17 00:00:00 2001
From: herbelin
Date: Wed, 22 Jan 2003 21:20:52 +0000
Subject: MAJ

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@3598 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 contrib/romega/ReflOmegaCore.v | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/contrib/romega/ReflOmegaCore.v b/contrib/romega/ReflOmegaCore.v
index 469df15435..95e4a5f5ae 100644
--- a/contrib/romega/ReflOmegaCore.v
+++ b/contrib/romega/ReflOmegaCore.v
@@ -667,9 +667,8 @@ Recursive Tactic Definition loop t := (
 And Simplify := (
   Match Context With [|- ?1 ] -> Try (loop ?1) | _ -> Idtac).
 
-(* L'utilisation de Match n'est qu'un hack pour contourner un bug de la 7.0 *)
 Tactic Definition ProveStable x th :=
-  (Match x With [?1] -> Unfold term_stable ?1; Intros; Simplify; Simpl; Apply th).
+  Unfold term_stable x; Intros; Simplify; Simpl; Apply th.
 
 (* \subsubsection{Les règles elle mêmes} *)
 Definition Tplus_assoc_l [t: term] :=
-- 
cgit v1.2.3