add basic Dbg desugaring and LowLevelDbg

This commit is contained in:
Brendan Hansknecht 2023-11-28 18:10:36 -08:00
parent 3f276b6018
commit b7f72eff86
No known key found for this signature in database
GPG key ID: 0EA784685083E75B
12 changed files with 84 additions and 30 deletions

View file

@ -741,7 +741,7 @@ pub fn constrain_expr(
}
Dbg {
loc_condition,
loc_message,
loc_continuation,
variable,
symbol: _,
@ -749,12 +749,12 @@ pub fn constrain_expr(
let dbg_type = constraints.push_variable(*variable);
let expected_dbg = constraints.push_expected_type(Expected::NoExpectation(dbg_type));
let cond_con = constrain_expr(
let message_con = constrain_expr(
types,
constraints,
env,
loc_condition.region,
&loc_condition.value,
loc_message.region,
&loc_message.value,
expected_dbg,
);
@ -767,7 +767,7 @@ pub fn constrain_expr(
expected,
);
constraints.exists_many([*variable], [cond_con, continuation_con])
constraints.exists_many([*variable], [message_con, continuation_con])
}
If {