diff options
| author | Pierre-Marie Pédrot | 2014-03-19 19:10:43 +0100 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2014-03-19 21:04:25 +0100 |
| commit | 2d015514b890c2c6f5506fa15c5b592209a590ae (patch) | |
| tree | 7007e9454c587ea6496d3c4d24b5e808aaa785de /parsing | |
| parent | 53138852926664706193f09d013d3e8087f7bc8f (diff) | |
Adding a Print Strategy vernacular command. It allows to check the
transparent status of variables and constants.
Diffstat (limited to 'parsing')
| -rw-r--r-- | parsing/g_vernac.ml4 | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/parsing/g_vernac.ml4 b/parsing/g_vernac.ml4 index b52dcdbd60..73b26b02d3 100644 --- a/parsing/g_vernac.ml4 +++ b/parsing/g_vernac.ml4 @@ -878,8 +878,9 @@ GEXTEND Gram | IDENT "Assumptions"; qid = smart_global -> PrintAssumptions (false, false, qid) | IDENT "Opaque"; IDENT "Dependencies"; qid = smart_global -> PrintAssumptions (true, false, qid) | IDENT "Transparent"; IDENT "Dependencies"; qid = smart_global -> PrintAssumptions (false, true, qid) - | IDENT "All"; IDENT "Dependencies"; qid = smart_global -> PrintAssumptions (true, true, qid) ] ] - + | IDENT "All"; IDENT "Dependencies"; qid = smart_global -> PrintAssumptions (true, true, qid) + | IDENT "Strategy"; qid = smart_global -> PrintStrategy (Some qid) + | IDENT "Strategies" -> PrintStrategy None ] ] ; class_rawexpr: [ [ IDENT "Funclass" -> FunClass |
