diff options
| author | Emilio Jesus Gallego Arias | 2020-02-21 12:59:51 -0500 |
|---|---|---|
| committer | Emilio Jesus Gallego Arias | 2020-03-25 23:45:01 -0400 |
| commit | 9847448b5f9dbf32806decf676f415d584a2cddb (patch) | |
| tree | 8a2e4b8cc2a12df6ebafc1c021f59348d2b2787e /coqpp | |
| parent | f374c2562b9522bd90330f6f17f0a7e41c723e8b (diff) | |
[gramlib] Remove warning function parameter in favor of standard mechanism.
If we need more fine-tuning we should manage the warnings with the
standard Coq mechanism.
Diffstat (limited to 'coqpp')
| -rw-r--r-- | coqpp/coqpp_main.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/coqpp/coqpp_main.ml b/coqpp/coqpp_main.ml index 17f81c555c..0e0aefaaef 100644 --- a/coqpp/coqpp_main.ml +++ b/coqpp/coqpp_main.ml @@ -253,7 +253,7 @@ and print_symbol fmt tkn = match tkn with fprintf fmt "Pcoq.G.Rules.make @[(%a)@ (%a)@]" (print_symbols ~norec:true) tkn print_fun (vars, body) in let pr fmt rules = print_list fmt pr rules in - fprintf fmt "(Pcoq.G.Symbol.rules ~warning:None %a)" pr (List.rev rules) + fprintf fmt "(Pcoq.G.Symbol.rules %a)" pr (List.rev rules) | SymbQuote c -> fprintf fmt "(%s)" c |