aboutsummaryrefslogtreecommitdiff
path: root/proofs/redexpr.mli
diff options
context:
space:
mode:
Diffstat (limited to 'proofs/redexpr.mli')
-rw-r--r--proofs/redexpr.mli5
1 files changed, 3 insertions, 2 deletions
diff --git a/proofs/redexpr.mli b/proofs/redexpr.mli
index 8a7fcb3c7e..31affc2807 100644
--- a/proofs/redexpr.mli
+++ b/proofs/redexpr.mli
@@ -17,10 +17,11 @@ open Locus
type red_expr =
(constr, evaluable_global_reference, constr_pattern) red_expr_gen
-
+
val out_with_occurrences : 'a with_occurrences -> occurrences * 'a
-val reduction_of_red_expr : red_expr -> reduction_function * cast_kind
+val reduction_of_red_expr :
+ Environ.env -> red_expr -> reduction_function * cast_kind
(** [true] if we should use the vm to verify the reduction *)