diff options
| author |  Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2014-08-12 14:03:32 +0200 |
|---|---|---|
| committer | Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2014-09-12 10:39:32 +0200 |
| commit | 012fe1a96ba81ab0a7fa210610e3f25187baaf1d (patch) | |
| tree | 32282ac2f1198738c8c545b19215ff0a0d9ef6ce /printing/pptactic.ml | |
| parent | b720cd3cbefa46da784b68a8e016a853f577800c (diff) | |
Referring to evars by names. Added a parser for evars (but parsing of
instances still to do). Using heuristics to name after the quantifier
name it comes. Also added a "sigma" to almost all printing functions.
Diffstat (limited to 'printing/pptactic.ml')
| -rw-r--r-- | printing/pptactic.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/printing/pptactic.ml b/printing/pptactic.ml index 647d5702e..841eb6039 100644 --- a/printing/pptactic.ml +++ b/printing/pptactic.ml @@ -1096,7 +1096,7 @@ let _ = Hook.set Tactic_debug.tactic_printer (fun x -> pr_glob_tactic (Global.env()) x) let _ = Hook.set Tactic_debug.match_pattern_printer - (fun env hyp -> pr_match_pattern (pr_constr_pattern_env env) hyp) + (fun env sigma hyp -> pr_match_pattern (pr_constr_pattern_env env sigma) hyp) let _ = Hook.set Tactic_debug.match_rule_printer (fun rl -> |