diff options
Diffstat (limited to 'printing/printer.ml')
| -rw-r--r-- | printing/printer.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/printing/printer.ml b/printing/printer.ml index 7a9dcb03cd..fa776d11e0 100644 --- a/printing/printer.ml +++ b/printing/printer.ml @@ -127,6 +127,7 @@ let pr_global_env = pr_global_env let pr_global = pr_global_env Id.Set.empty let pr_constant env cst = pr_global_env (Termops.vars_of_env env) (ConstRef cst) +let pr_existential_key evk = str (string_of_existential evk) let pr_existential env ev = pr_lconstr_env env (mkEvar ev) let pr_inductive env ind = pr_lconstr_env env (mkInd ind) let pr_constructor env cstr = pr_lconstr_env env (mkConstruct cstr) |