aboutsummaryrefslogtreecommitdiff
path: root/kernel/vmlambda.ml
diff options
context:
space:
mode:
authorcoqbot-app[bot]2020-12-09 18:01:37 +0000
committerGitHub2020-12-09 18:01:37 +0000
commit4fbc04b0fe0b89edfe35438d01d3b664fc21e6f8 (patch)
tree7ae1df67aecdccd63d86f251306e2707a07f8bc9 /kernel/vmlambda.ml
parent9e0ca704fa8273a8337ff9e118d2d08620af8962 (diff)
parente0a943d40c6749e602421ac89059e0d6caf57518 (diff)
Merge PR #13537: More efficient implementation for substitutions.
Reviewed-by: SkySkimmer Ack-by: gares
Diffstat (limited to 'kernel/vmlambda.ml')
-rw-r--r--kernel/vmlambda.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/kernel/vmlambda.ml b/kernel/vmlambda.ml
index 9cca204e8c..390fa58883 100644
--- a/kernel/vmlambda.ml
+++ b/kernel/vmlambda.ml
@@ -179,7 +179,7 @@ let decompose_Llam lam =
let subst_id = subs_id 0
let lift = subs_lift
let liftn = subs_liftn
-let cons v subst = subs_cons([|v|], subst)
+let cons v subst = subs_cons v subst
let shift subst = subs_shft (1, subst)
(* A generic map function *)