aboutsummaryrefslogtreecommitdiff
path: root/kernel/sign.ml
diff options
context:
space:
mode:
Diffstat (limited to 'kernel/sign.ml')
-rw-r--r--kernel/sign.ml1
1 files changed, 1 insertions, 0 deletions
diff --git a/kernel/sign.ml b/kernel/sign.ml
index 27aa150e62..d9438eb98a 100644
--- a/kernel/sign.ml
+++ b/kernel/sign.ml
@@ -43,6 +43,7 @@ let rec mem_var_context id = function
| _ :: sign -> mem_var_context id sign
| [] -> false
let fold_var_context = List.fold_right
+let fold_var_context_reverse = List.fold_left
let fold_var_context_both_sides = list_fold_right_and_left
let it_var_context_quantifier f = List.fold_left (fun c d -> f d c)