diff options
| author | Hugo Herbelin | 2018-09-11 09:37:31 +0200 |
|---|---|---|
| committer | Hugo Herbelin | 2018-09-11 09:37:31 +0200 |
| commit | 2489a43dfcfa086bb0785714345bf2c143fa1ac4 (patch) | |
| tree | 0951952f83b733f598ab7387e599b7efb75268b7 /vernac | |
| parent | dc8f73016a6306f2da8859340e07b83aca1012d4 (diff) | |
| parent | e941272fd9252060280a4a209030dbc8db6e93c9 (diff) | |
Merge PR #8105: Remove environment passing to cache_coercion function
Diffstat (limited to 'vernac')
| -rw-r--r-- | vernac/vernacentries.ml | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/vernac/vernacentries.ml b/vernac/vernacentries.ml index f7ba305374..385e28f64b 100644 --- a/vernac/vernacentries.ml +++ b/vernac/vernacentries.ml @@ -1802,13 +1802,13 @@ let vernac_print ~atts env sigma = | PrintName (qid,udecl) -> dump_global qid; print_name env sigma qid udecl - | PrintGraph -> Prettyp.print_graph env sigma + | PrintGraph -> Prettyp.print_graph () | PrintClasses -> Prettyp.print_classes() | PrintTypeClasses -> Prettyp.print_typeclasses() | PrintInstances c -> Prettyp.print_instances (smart_global c) - | PrintCoercions -> Prettyp.print_coercions env sigma + | PrintCoercions -> Prettyp.print_coercions () | PrintCoercionPaths (cls,clt) -> - Prettyp.print_path_between env sigma (cl_of_qualid cls) (cl_of_qualid clt) + Prettyp.print_path_between (cl_of_qualid cls) (cl_of_qualid clt) | PrintCanonicalConversions -> Prettyp.print_canonical_projections env sigma | PrintUniverses (b, dst) -> let univ = Global.universes () in |