From a6a811fbb1ee79e2ec50f07b2adaf348c43a3f78 Mon Sep 17 00:00:00 2001
From: letouzey
Date: Thu, 15 Oct 2009 08:22:26 +0000
Subject: OrderedType2.order : fix the last fix (a fail at the wrong place)

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@12391 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 theories/Structures/OrderedType2.v | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/theories/Structures/OrderedType2.v b/theories/Structures/OrderedType2.v
index 14e946dd00..25cfd3b1ae 100644
--- a/theories/Structures/OrderedType2.v
+++ b/theories/Structures/OrderedType2.v
@@ -251,7 +251,7 @@ Ltac order_loop := intros; trivial;
       | H : x <= z |- _ => fail 1
       | _ => generalize (le_trans H1 H2); intro; order_loop
     end
- | _ => auto; fail
+ | _ => auto
 end.
 
 Ltac order := order_loop; fail.
-- 
cgit v1.2.3