diff options
| author | barras | 2008-11-27 17:47:32 +0000 |
|---|---|---|
| committer | barras | 2008-11-27 17:47:32 +0000 |
| commit | 8b61f54c09646dcc8284ee3269c88c35e0463c6b (patch) | |
| tree | 24dd1f5e76055e7b5c31fc12478ba897e7a7467b | |
| parent | 22aad8ebc99ff3aa81478180c5ceb7b52024c4c4 (diff) | |
fixed non-exhaustive pattern matching
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@11638 85f007b7-540e-0410-9357-904b9bb8a0f7
| -rw-r--r-- | contrib/xml/proofTree2Xml.ml4 | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/contrib/xml/proofTree2Xml.ml4 b/contrib/xml/proofTree2Xml.ml4 index 05be01bc61..26b1b0b760 100644 --- a/contrib/xml/proofTree2Xml.ml4 +++ b/contrib/xml/proofTree2Xml.ml4 @@ -91,6 +91,7 @@ let string_of_prim_rule x = match x with | Proof_type.Thin _ -> "Thin" | Proof_type.ThinBody _-> "ThinBody" | Proof_type.Move (_,_,_) -> "Move" + | Proof_type.Order _ -> "Order" | Proof_type.Rename (_,_) -> "Rename" | Proof_type.Change_evars -> "Change_evars" |