diff options
author | 2018-03-05 13:15:15 +0100 | |
---|---|---|
committer | 2018-03-05 13:15:15 +0100 | |
commit | 736e86e06b5831a0dd4b6a655708b4ffd2b4ee64 (patch) | |
tree | f1f572e011f0e5e476256d58517258774bdf149e /tactics/tactics.ml | |
parent | a46a04577e34c69b42c2728ec1e0babb5be23e31 (diff) | |
parent | 7267e31fa4456aee62a1e39dfdb7e38a8832f93f (diff) |
Merge PR #6700: [ssr] rewrite Ssripats and Ssrview in the tactic monad
Diffstat (limited to 'tactics/tactics.ml')
-rw-r--r-- | tactics/tactics.ml | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/tactics/tactics.ml b/tactics/tactics.ml index 61ca3e319..fbbdfe735 100644 --- a/tactics/tactics.ml +++ b/tactics/tactics.ml @@ -644,7 +644,8 @@ let cofix ido = match ido with (* Reduction and conversion tactics *) (**************************************************************) -type tactic_reduction = env -> evar_map -> constr -> constr +type tactic_reduction = Reductionops.reduction_function +type e_tactic_reduction = Reductionops.e_reduction_function let pf_reduce_decl redfun where decl gl = let open Context.Named.Declaration in |