diff options
| author |  Maxime Dénès <mail@maximedenes.fr> | 2017-03-22 23:25:27 +0100 |
|---|---|---|
| committer | Maxime Dénès <mail@maximedenes.fr> | 2017-03-22 23:25:27 +0100 |
| commit | 483dc1f1072d41910ced050c810930c294ec4a3a (patch) | |
| tree | 9ddaf08c03d41427bd0bc9f015ff42606b8229aa /tactics | |
| parent | cd87eac3757d8925ff4ba7dee85efadb195153a3 (diff) | |
| parent | 88c02e02a7b6067c78608e9ea526f81fd122edab (diff) | |
Merge PR#480: show unused intro pattern warning
Diffstat (limited to 'tactics')
| -rw-r--r-- | tactics/tactics.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tactics/tactics.ml b/tactics/tactics.ml index 9d64e7c59..f186f6e0e 100644 --- a/tactics/tactics.ml +++ b/tactics/tactics.ml @@ -3010,7 +3010,7 @@ let warn_unused_intro_pattern = (fun c -> Printer.pr_constr (fst (run_delayed (Global.env()) Evd.empty c)))) names) let check_unused_names names = - if not (List.is_empty names) && Flags.is_verbose () then + if not (List.is_empty names) then warn_unused_intro_pattern names let intropattern_of_name gl avoid = function |