diff options
| author | Maxime Dénès | 2018-10-11 12:30:50 +0200 |
|---|---|---|
| committer | Maxime Dénès | 2018-10-11 12:30:50 +0200 |
| commit | 4a244648cff78c7f7333ac5b335de3f6e742908a (patch) | |
| tree | 717b267cc2e2ae1359bfcb2bb7f30b2f5bde9640 /dev/top_printers.ml | |
| parent | 2bdc3a06c5620bf4796501562886b26f8c1ef895 (diff) | |
| parent | bc240341d9f0f7466c82e8ee9f3f325cda6fc3bf (diff) | |
Merge PR #8161: Implement VERNAC EXTEND in coqpp
Diffstat (limited to 'dev/top_printers.ml')
| -rw-r--r-- | dev/top_printers.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/dev/top_printers.ml b/dev/top_printers.ml index 8129a4a867..44d44ccc4b 100644 --- a/dev/top_printers.ml +++ b/dev/top_printers.ml @@ -527,7 +527,7 @@ let _ = extend_vernac_command_grammar ("PrintConstr", 0) None [GramTerminal "PrintConstr"; GramNonTerminal - (Loc.tag (Some (rawwit wit_constr),Extend.Aentry Pcoq.Constr.constr))] + (Loc.tag (rawwit wit_constr,Extend.Aentry Pcoq.Constr.constr))] let _ = try @@ -543,7 +543,7 @@ let _ = extend_vernac_command_grammar ("PrintPureConstr", 0) None [GramTerminal "PrintPureConstr"; GramNonTerminal - (Loc.tag (Some (rawwit wit_constr),Extend.Aentry Pcoq.Constr.constr))] + (Loc.tag (rawwit wit_constr,Extend.Aentry Pcoq.Constr.constr))] (* Setting printer of unbound global reference *) open Names |