diff options
| author | sacerdot | 2004-11-17 17:44:35 +0000 |
|---|---|---|
| committer | sacerdot | 2004-11-17 17:44:35 +0000 |
| commit | 9a5c5db122becb63c5b72a967ef141bdd3fb5319 (patch) | |
| tree | 456513517718198461fabae4e96242348aeeab13 /toplevel | |
| parent | 85500252f0e8c0d2b2cceb2418bcadadbbc5cfd0 (diff) | |
New command "Print Rewrite HindDb dbname".
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@6324 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'toplevel')
| -rw-r--r-- | toplevel/vernacentries.ml | 1 | ||||
| -rw-r--r-- | toplevel/vernacexpr.ml | 1 |
2 files changed, 2 insertions, 0 deletions
diff --git a/toplevel/vernacentries.ml b/toplevel/vernacentries.ml index 3c8dd414eb..a7df137858 100644 --- a/toplevel/vernacentries.ml +++ b/toplevel/vernacentries.ml @@ -930,6 +930,7 @@ let vernac_print = function | PrintHint qid -> Auto.print_hint_ref (Nametab.global qid) | PrintHintGoal -> Auto.print_applicable_hint () | PrintHintDbName s -> Auto.print_hint_db_by_name s + | PrintRewriteHintDbName s -> Autorewrite.print_rewrite_hintdb s | PrintHintDb -> Auto.print_searchtable () | PrintSetoids -> Setoid_replace.print_setoids() | PrintScopes -> diff --git a/toplevel/vernacexpr.ml b/toplevel/vernacexpr.ml index 031cc98a26..afcc361f83 100644 --- a/toplevel/vernacexpr.ml +++ b/toplevel/vernacexpr.ml @@ -55,6 +55,7 @@ type printable = | PrintHint of reference | PrintHintGoal | PrintHintDbName of string + | PrintRewriteHintDbName of string | PrintHintDb | PrintSetoids | PrintScopes |