diff options
| author |  pboutill <pboutill@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2012-08-05 23:13:15 +0000 |
|---|---|---|
| committer | pboutill <pboutill@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2012-08-05 23:13:15 +0000 |
| commit | bead69d09207e9624f37853ce63b695fe7ff6e87 (patch) | |
| tree | 9d317f0530aac378642dbb3cb37df395313787b4 /toplevel | |
| parent | 66965ce183e30c2dc18f64f6035f2d158bc9f545 (diff) | |
Dump references in reduction tactics
Patch by Adam Chilipala.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@15681 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'toplevel')
| -rw-r--r-- | toplevel/vernacentries.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/toplevel/vernacentries.ml b/toplevel/vernacentries.ml index 46fdeb532..a4a14b7b3 100644 --- a/toplevel/vernacentries.ml +++ b/toplevel/vernacentries.ml @@ -1317,6 +1317,7 @@ let vernac_check_may_eval redexp glopt rc = | None -> msg_notice (print_judgment env j) | Some r -> + Tacinterp.dump_glob_red_expr r; let (sigma',r_interp) = interp_redexp env sigma' r in let redfun = fst (reduction_of_red_expr r_interp) in msg_notice (print_eval redfun env sigma' rc j) |