summaryrefslogtreecommitdiff
path: root/middle_end/flambda/un_anf.ml
diff options
context:
space:
mode:
Diffstat (limited to 'middle_end/flambda/un_anf.ml')
-rw-r--r--middle_end/flambda/un_anf.ml2
1 files changed, 0 insertions, 2 deletions
diff --git a/middle_end/flambda/un_anf.ml b/middle_end/flambda/un_anf.ml
index 7ce8d29934..a3a5f10a58 100644
--- a/middle_end/flambda/un_anf.ml
+++ b/middle_end/flambda/un_anf.ml
@@ -37,7 +37,6 @@ type var_info =
linear_let_bound_vars : V.Set.t;
assigned : V.Set.t;
closure_environment : V.Set.t;
- let_bound_vars_that_can_be_moved : V.Set.t;
}
let ignore_uconstant (_ : Clambda.uconstant) = ()
@@ -244,7 +243,6 @@ let make_var_info (clam : Clambda.ulambda) : var_info =
in
{ used_let_bound_vars; linear_let_bound_vars; assigned;
closure_environment = !environment_vars;
- let_bound_vars_that_can_be_moved = V.Set.empty;
}
(* When sequences of [let]-bindings match the evaluation order in a subsequent