diff options
Diffstat (limited to 'proofs')
| -rw-r--r-- | proofs/tactic_debug.mli | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/proofs/tactic_debug.mli b/proofs/tactic_debug.mli index a9cd025a7f..3b9858f16e 100644 --- a/proofs/tactic_debug.mli +++ b/proofs/tactic_debug.mli @@ -22,7 +22,7 @@ val tactic_printer : (glob_tactic_expr -> Pp.std_ppcmds) Hook.t val match_pattern_printer : (env -> constr_pattern match_pattern -> Pp.std_ppcmds) Hook.t val match_rule_printer : - ((Genarg.glob_constr_and_expr * constr_pattern,glob_tactic_expr) match_rule -> Pp.std_ppcmds) Hook.t + ((Tacexpr.glob_constr_and_expr * constr_pattern,glob_tactic_expr) match_rule -> Pp.std_ppcmds) Hook.t (** Debug information *) type debug_info = @@ -41,7 +41,7 @@ val db_constr : debug_info -> env -> constr -> unit (** Prints the pattern rule *) val db_pattern_rule : - debug_info -> int -> (Genarg.glob_constr_and_expr * constr_pattern,glob_tactic_expr) match_rule -> unit + debug_info -> int -> (Tacexpr.glob_constr_and_expr * constr_pattern,glob_tactic_expr) match_rule -> unit (** Prints a matched hypothesis *) val db_matched_hyp : |