diff options
| author | Gaƫtan Gilbert | 2019-10-31 14:55:05 +0100 |
|---|---|---|
| committer | Emilio Jesus Gallego Arias | 2019-10-31 17:06:15 +0100 |
| commit | 85905b38c15c3d2bb73e878e6e7db180b73d468e (patch) | |
| tree | 715c6f35f099b48aa1c1540d2f53d958b35fe230 /toplevel | |
| parent | 777109f0068d524ca2a82d405416da273fec3d7f (diff) | |
[prettyp] remove `mod_ops` and `indirect_accessor` parameters
`Prettyp` is now late enough in linking to refer to them.
Diffstat (limited to 'toplevel')
| -rw-r--r-- | toplevel/coqc.ml | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/toplevel/coqc.ml b/toplevel/coqc.ml index 642dc94ab2..98206fb341 100644 --- a/toplevel/coqc.ml +++ b/toplevel/coqc.ml @@ -53,11 +53,7 @@ let coqc_main copts ~opts = if opts.Coqargs.post.Coqargs.output_context then begin let sigma, env = let e = Global.env () in Evd.from_env e, e in - let library_accessor = Library.indirect_accessor in - let mod_ops = { Printmod.import_module = Declaremods.import_module - ; process_module_binding = Declaremods.process_module_binding - } in - Feedback.msg_notice Pp.(Flags.(with_option raw_print (Prettyp.print_full_pure_context ~mod_ops ~library_accessor env) sigma) ++ fnl ()) + Feedback.msg_notice Pp.(Flags.(with_option raw_print (Prettyp.print_full_pure_context env) sigma) ++ fnl ()) end; CProfile.print_profile () |
