diff options
Diffstat (limited to 'dev/top_printers.ml')
| -rw-r--r-- | dev/top_printers.ml | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/dev/top_printers.ml b/dev/top_printers.ml index eefd07e605..0aa29cadf2 100644 --- a/dev/top_printers.ml +++ b/dev/top_printers.ml @@ -127,6 +127,8 @@ let pr_existentialset evars = prlist_with_sep spc pr_evar (Evar.Set.elements evars) let ppexistentialset evars = pp (pr_existentialset evars) +let ppexistentialfilter filter = + pp (prlist_with_sep spc bool (Evd.Filter.repr filter)) let ppclenv clenv = pp(pr_clenv clenv) let ppgoalgoal gl = pp(Goal.pr_goal gl) let ppgoal g = pp(Printer.pr_goal g) |