Start drop specialisation for joinpoints

This commit is contained in:
J.Teeuwissen 2023-05-29 16:26:50 +02:00 committed by Folkert
parent 2faa0e4c5b
commit 94fb89bde4
No known key found for this signature in database
GPG key ID: 1F17F6FFD112B97C
12 changed files with 365 additions and 190 deletions

View file

@ -3076,6 +3076,29 @@ fn record_update() {
)
}
#[mono_test]
fn drop_specialize_after_jump() {
indoc!(
r#"
app "test" provides [main] to "./platform"
Tuple a b : { left : a, right : b }
main =
v = "value"
t = { left: { left: v, right: v }, right: v }
tupleItem t
tupleItem = \t ->
true = Bool.true
l = t.left
x = if true then 1 else 0
ll = l.left
{ left: t, right: ll}
"#
)
}
#[mono_test(mode = "test")]
fn dbg_in_expect() {
indoc!(