diff options
| author | letouzey | 2009-10-15 08:22:26 +0000 |
|---|---|---|
| committer | letouzey | 2009-10-15 08:22:26 +0000 |
| commit | a6a811fbb1ee79e2ec50f07b2adaf348c43a3f78 (patch) | |
| tree | 0780bb956cbce59af37091c3fedd880dea56dba8 | |
| parent | 4bae5041789fda4d686726d27ea468b227620cd4 (diff) | |
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
| -rw-r--r-- | theories/Structures/OrderedType2.v | 2 |
1 files changed, 1 insertions, 1 deletions
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. |