diff options
| author | Pierre-Marie Pédrot | 2020-07-10 19:01:43 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2020-07-17 15:16:12 +0200 |
| commit | 85a4780bcb462a9fb5a86bb510929e036171d2fe (patch) | |
| tree | e6495861257ce5f6c54bd538544c205aa76749b3 /vernac/comHints.ml | |
| parent | f54bc666c62ad9a66067cb486816cdfc68c2946d (diff) | |
Tweak the warning for arbitrary term hints.
Fixes #11970.
Diffstat (limited to 'vernac/comHints.ml')
| -rw-r--r-- | vernac/comHints.ml | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/vernac/comHints.ml b/vernac/comHints.ml index b05bf9a675..0e3e3c61a9 100644 --- a/vernac/comHints.ml +++ b/vernac/comHints.ml @@ -64,11 +64,11 @@ let project_hint ~poly pri l2r r = (info, false, true, Hints.PathAny, Hints.IsGlobRef (Names.GlobRef.ConstRef c)) let warn_deprecated_hint_constr = - CWarnings.create ~name:"deprecated-hint-constr" ~category:"deprecated" + CWarnings.create ~name:"fragile-hint-constr" ~category:"automation" (fun () -> Pp.strbrk - "Declaring arbitrary terms as hints is deprecated; declare a global \ - reference instead") + "Declaring arbitrary terms as hints is fragile; it is recommended to \ + declare a toplevel constant instead") let interp_hints ~poly h = let env = Global.env () in |