simplify constraints

This commit is contained in:
Folkert 2022-05-08 20:11:12 +02:00
parent 7be41d8c09
commit b21a226281
No known key found for this signature in database
GPG key ID: 1F17F6FFD112B97C

View file

@ -888,9 +888,7 @@ pub fn constrain_expr(
expected.clone(),
);
let cons = constrain_recursive_defs(constraints, env, defs, body_con);
constraints.exists([], cons)
constrain_recursive_defs(constraints, env, defs, body_con)
}
LetNonRec(def, loc_ret) => {
let mut stack = Vec::with_capacity(1);
@ -913,9 +911,7 @@ pub fn constrain_expr(
);
while let Some(def) = stack.pop() {
let cons = constrain_def(constraints, env, def, body_con);
body_con = constraints.exists([], cons)
body_con = constrain_def(constraints, env, def, body_con)
}
body_con