diff options
| author | Hugo Herbelin | 2019-04-29 20:16:51 +0200 |
|---|---|---|
| committer | Hugo Herbelin | 2019-04-30 12:04:20 +0200 |
| commit | 29955b2b6e5eb46adc71425956a5c940522fb30d (patch) | |
| tree | 15210abcd956b379e9101a23b59bf3f4b3765718 /plugins | |
| parent | 7fbb53b1649627b3f765fc9516becd3cd1674464 (diff) | |
Deprecating convert_concl_no_check.
Diffstat (limited to 'plugins')
| -rw-r--r-- | plugins/ltac/g_auto.mlg | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/plugins/ltac/g_auto.mlg b/plugins/ltac/g_auto.mlg index ec5e46d89b..e59076bd63 100644 --- a/plugins/ltac/g_auto.mlg +++ b/plugins/ltac/g_auto.mlg @@ -182,9 +182,18 @@ TACTIC EXTEND unify } END +{ +let deprecated_convert_concl_no_check = + CWarnings.create + ~name:"convert_concl_no_check" ~category:"deprecated" + (fun () -> Pp.str "The syntax [convert_concl_no_check] is deprecated. Use [change_no_check] instead.") +} TACTIC EXTEND convert_concl_no_check -| ["convert_concl_no_check" constr(x) ] -> { Tactics.convert_concl ~check:false x DEFAULTcast } +| ["convert_concl_no_check" constr(x) ] -> { + deprecated_convert_concl_no_check (); + Tactics.convert_concl ~check:false x DEFAULTcast + } END { |
