aboutsummaryrefslogtreecommitdiff
path: root/dev/top_printers.ml
diff options
context:
space:
mode:
authorEnrico Tassi2017-12-22 14:11:55 +0100
committerEnrico Tassi2017-12-27 14:19:59 +0100
commitb37d3f199e4521e2ae20cc96f0f2b04acc36c7cc (patch)
tree5286af838087a280405b1cf1c7a3248612e7c5aa /dev/top_printers.ml
parent7e319ad03aba413f3165b848eaf821b364f9291b (diff)
[API] remove large file containing duplicate interfaces
... in favor of having Public/Internal sub modules in each and every module grouping functions according to their intended client.
Diffstat (limited to 'dev/top_printers.ml')
-rw-r--r--dev/top_printers.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/dev/top_printers.ml b/dev/top_printers.ml
index 832040ad2c..ff38257877 100644
--- a/dev/top_printers.ml
+++ b/dev/top_printers.ml
@@ -233,7 +233,7 @@ let ppenvwithcst e = pp
str "[" ++ pr_rel_context e Evd.empty (rel_context e) ++ str "]" ++ spc() ++
str "{" ++ Cmap_env.fold (fun a _ s -> Constant.print a ++ spc () ++ s) (Obj.magic e).Pre_env.env_globals.Pre_env.env_constants (mt ()) ++ str "}")
-let pptac = (fun x -> pp(Ltac_plugin.Pptactic.pr_glob_tactic (API.Global.env()) x))
+let pptac = (fun x -> pp(Ltac_plugin.Pptactic.pr_glob_tactic (Global.env()) x))
let ppobj obj = Format.print_string (Libobject.object_tag obj)