diff options
Diffstat (limited to 'kernel/closure.ml')
-rw-r--r-- | kernel/closure.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/kernel/closure.ml b/kernel/closure.ml index 2f83657d0..e588ca618 100644 --- a/kernel/closure.ml +++ b/kernel/closure.ml @@ -657,7 +657,7 @@ let optimise_closure env c = (env',c') let mk_lambda env t = -(* let (env,t) = optimise_closure env t in*) + let (env,t) = optimise_closure env t in let (rvars,t') = decompose_lam t in FLambda(List.length rvars, List.rev rvars, t', env) |