language-servers/roc
1
0
Fork 0
mirror of https://github.com/roc-lang/roc.git synced 2025-10-03 00:24:34 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 6

fix test hanging forever

Browse source
This commit is contained in:
Folkert 2021-01-25 13:20:40 +01:00
parent 171e0358f3
commit 0166a4d915
7 changed files with 66 additions and 17 deletions
Download patch file Download diff file Expand all files Collapse all files

1
compiler/mono/src/borrow.rs
View file

@ -589,5 +589,6 @@ pub fn lowlevel_borrow_signature(arena: &Bump, op: LowLevel) -> &[bool] {
StrFromInt => arena.alloc_slice_copy(&[irrelevant]),
Hash => arena.alloc_slice_copy(&[borrowed]),
DictSize => arena.alloc_slice_copy(&[borrowed]),
DictEmpty => &[],
}
}

25
compiler/mono/tests/test_mono.rs
View file

@ -642,21 +642,18 @@ mod test_mono {
"#,
indoc!(
r#"
procedure List.5 (#Attr.2, #Attr.3):
let Test.7 = lowlevel ListAppend #Attr.2 #Attr.3;
ret Test.7;
procedure Test.1 (Test.2):
let Test.6 = 42i64;
let Test.5 = CallByName List.5 Test.2 Test.6;
ret Test.5;
procedure Test.0 ():
let Test.8 = 1i64;
let Test.9 = 2i64;
let Test.4 = Array [Test.8, Test.9];
let Test.3 = CallByName Test.1 Test.4;
procedure Dict.2 ():
let Test.4 = lowlevel DictEmpty ;
ret Test.4;
procedure Dict.6 (#Attr.2):
let Test.3 = lowlevel DictSize #Attr.2;
ret Test.3;
procedure Test.0 ():
let Test.2 = FunctionPointer Dict.2;
let Test.1 = CallByName Dict.6 Test.2;
ret Test.1;
"#
),
)