language-servers/roc
1
0
Fork 0
mirror of https://github.com/roc-lang/roc.git synced 2025-09-26 13:29:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 6

correctly add padding between data and tag id

Browse source
This commit is contained in:
Folkert 2023-03-26 18:23:50 +02:00
parent fb4a56e916
commit c0f49ce62c
No known key found for this signature in database
GPG key ID: 1F17F6FFD112B97C
3 changed files with 167 additions and 13 deletions
Download patch file Download diff file Expand all files Collapse all files

75
crates/repl_expect/src/lib.rs
View file

@ -1105,4 +1105,79 @@ mod test {
),
);
}
#[test]
fn tag_payloads_of_different_size() {
run_expect_test(
indoc!(
r#"
interface Test exposes [] imports []
actual : [Leftover (List U8), TooShort]
actual = Leftover [49, 93]
expect
expected : [Leftover (List U8), TooShort]
expected = TooShort
actual == expected
"#
),
indoc!(
r#"
This expectation failed:
6│> expect
7│> expected : [Leftover (List U8), TooShort]
8│> expected = TooShort
9│>
10│> actual == expected
When it failed, these variables had these values:
expected : [
Leftover (List U8),
TooShort,
]
expected = TooShort
"#
),
);
}
#[test]
fn extra_offset_in_tag_union() {
run_expect_test(
indoc!(
r#"
interface Test exposes [] imports []
actual : Result Str U64
actual = Err 1
expect
expected : Result Str U64
expected = Ok "foobar"
actual == expected
"#
),
indoc!(
r#"
This expectation failed:
6│> expect
7│> expected : Result Str U64
8│> expected = Ok "foobar"
9│>
10│> actual == expected
When it failed, these variables had these values:
expected : Result Str U64
expected = Ok "foobar"
"#
),
);
}
}