aboutsummaryrefslogtreecommitdiff
path: root/pretyping/reductionops.mli
diff options
context:
space:
mode:
authorpboutill2013-02-25 23:02:20 +0000
committerpboutill2013-02-25 23:02:20 +0000
commitaffdf7a0b6fa9a49562f4af04903ae8e44237654 (patch)
tree677de90635d88fbed2294fc471bc68c99a0ad71d /pretyping/reductionops.mli
parent6231cb1123a9d0d0b18d9aa457e645272fd8195e (diff)
Evarconv: When doing a iota of a fixpoint, use constant name instead of fixpoint definition
+ Help the use of #trace on evar_conv_appr_x git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16244 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'pretyping/reductionops.mli')
-rw-r--r--pretyping/reductionops.mli3
1 files changed, 2 insertions, 1 deletions
diff --git a/pretyping/reductionops.mli b/pretyping/reductionops.mli
index 916e001c1e..d4bb9aabff 100644
--- a/pretyping/reductionops.mli
+++ b/pretyping/reductionops.mli
@@ -230,7 +230,8 @@ val head_unfold_under_prod : transparent_state -> reduction_function
(** {6 Heuristic for Conversion with Evar } *)
val whd_betaiota_deltazeta_for_iota_state :
- transparent_state -> state_reduction_function
+ transparent_state -> Environ.env -> Evd.evar_map -> Cst_stack.t -> state ->
+ state * Cst_stack.t
(** {6 Meta-related reduction functions } *)
val meta_instance : evar_map -> constr freelisted -> constr