diff options
| author | Matej Košík | 2017-04-10 16:04:28 +0200 |
|---|---|---|
| committer | Matej Košík | 2017-04-10 16:04:28 +0200 |
| commit | 0980dbb1740c8d48d8ff0c516929f27f8cea854d (patch) | |
| tree | cc0c2c76eda49943edd452cffd3e0d9de3606bb7 | |
| parent | cec95b3e62e973af5a6aa1cb571c3c4654c3005e (diff) | |
Revert "refactoring: Reductionops.contextual_reduction_function type"
This reverts commit 470d0d56467a3a587dc34f958ffea8259618d1ae.
| -rw-r--r-- | pretyping/reductionops.mli | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/pretyping/reductionops.mli b/pretyping/reductionops.mli index 2a5f97f010..4cd7a2a869 100644 --- a/pretyping/reductionops.mli +++ b/pretyping/reductionops.mli @@ -109,9 +109,9 @@ end type state = constr * constr Stack.t -type local_reduction_function = evar_map -> constr -> constr -type contextual_reduction_function = env -> local_reduction_function +type contextual_reduction_function = env -> evar_map -> constr -> constr type reduction_function = contextual_reduction_function +type local_reduction_function = evar_map -> constr -> constr type e_reduction_function = { e_redfun : 'r. env -> 'r Sigma.t -> constr -> (constr, 'r) Sigma.sigma } |