language-servers/roc
1
0
Fork 0
mirror of https://github.com/roc-lang/roc.git synced 2025-09-28 22:34:45 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 7

Expand encode gen test

Browse source
This commit is contained in:
Ayaz Hafiz 2022-05-06 14:55:20 -04:00 • committed by ayazhafiz
parent 474c18ab83
commit bc0b82b97c
1 changed files with 10 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

16
compiler/test_gen/src/gen_abilities.rs
View file

@ -222,7 +222,6 @@ fn ability_used_as_type_still_compiles() {
#[test]
#[cfg(any(feature = "gen-llvm"))]
#[ignore]
fn encode() {
assert_evals_to!(
indoc!(
@ -249,15 +248,20 @@ fn encode() {
# impl Format for Linear
u8 = \n -> @Encoder (\lst, @Linear {} -> List.append lst n)
MyU8 := U8
Rgba := { r : U8, g : U8, b : U8, a : U8 }
# impl Encoding for MyU8
toEncoder = \@MyU8 n -> u8 n
# impl Encoding for Rgba
toEncoder = \@Rgba {r, g, b, a} ->
@Encoder \lst, fmt -> lst
|> appendWith (u8 r) fmt
|> appendWith (u8 g) fmt
|> appendWith (u8 b) fmt
|> appendWith (u8 a) fmt
myU8Bytes = toBytes (@MyU8 15) (@Linear {})
myU8Bytes = toBytes (@Rgba { r: 106, g: 90, b: 205, a: 255 }) (@Linear {})
"#
),
RocList::from_slice(&[15]),
RocList::from_slice(&[106, 90, 205, 255]),
RocList<u8>
)
}