diff options
| author | coq | 2005-11-08 11:16:57 +0000 |
|---|---|---|
| committer | coq | 2005-11-08 11:16:57 +0000 |
| commit | 6bc52e93cbc0e8c50e67a7436187491306ce0ca7 (patch) | |
| tree | 4de0ea4d3e43893c9f646de5dd6659e25bfb8459 /parsing | |
| parent | 7f8ea30bed07ca5340910fbb7df2b47dbc3cd7e0 (diff) | |
- debugging og "Show Intros": no line breaking + fresh ids
- added the command "Show Match t" which prints a typical
"match...with" for type t.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@7532 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'parsing')
| -rw-r--r-- | parsing/g_proofsnew.ml4 | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/parsing/g_proofsnew.ml4 b/parsing/g_proofsnew.ml4 index 914a92bf48..f482aa152e 100644 --- a/parsing/g_proofsnew.ml4 +++ b/parsing/g_proofsnew.ml4 @@ -75,6 +75,7 @@ GEXTEND Gram | IDENT "Show"; IDENT "Proof" -> VernacShow ShowProof | IDENT "Show"; IDENT "Intro" -> VernacShow (ShowIntros false) | IDENT "Show"; IDENT "Intros" -> VernacShow (ShowIntros true) + | IDENT "Show"; IDENT "Match"; id = identref -> VernacShow (ShowMatch id) | IDENT "Explain"; IDENT "Proof"; l = LIST0 integer -> VernacShow (ExplainProof l) | IDENT "Explain"; IDENT "Proof"; IDENT "Tree"; l = LIST0 integer -> |