fix gen_refcount tests

This commit is contained in:
Brendan Hansknecht 2024-07-10 22:09:29 -07:00
parent ad76fa2a4e
commit a8bef30392
No known key found for this signature in database
GPG key ID: 0EA784685083E75B
3 changed files with 34 additions and 3 deletions

View file

@ -96,13 +96,34 @@ fn list_str_inc() {
),
RocList<RocList<RocStr>>,
&[
Live(6), // s
Live(3), // s
Live(2), // list
Live(1) // result
]
);
}
#[test]
#[cfg(feature = "gen-wasm")]
fn list_str_slice() {
assert_refcounts!(
indoc!(
r#"
s = Str.concat "A long enough string " "to be heap-allocated"
list = [s, s, s]
List.dropFirst list 1
"#
),
RocList<RocList<RocStr>>,
&[
// Still has 3 refcounts cause the slice holds onto the list.
// So nothing in the list is freed yet.
Live(3), // s
Live(1) // result
]
);
}
#[test]
#[cfg(feature = "gen-wasm")]
fn list_str_dealloc() {