aboutsummaryrefslogtreecommitdiff
path: root/kernel/reduction.ml
diff options
context:
space:
mode:
Diffstat (limited to 'kernel/reduction.ml')
-rw-r--r--kernel/reduction.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/kernel/reduction.ml b/kernel/reduction.ml
index 10ce90291c..4e99446b63 100644
--- a/kernel/reduction.ml
+++ b/kernel/reduction.ml
@@ -290,7 +290,7 @@ let dest_prod env =
decrec (push_rel d env) (Sign.add_rel_decl d m) c0
| _ -> m,t
in
- decrec env []
+ decrec env Sign.empty_rel_context
(* The same but preserving lets *)
let dest_prod_assum env =