language-servers/roc
1
0
Fork 0
mirror of https://github.com/roc-lang/roc.git synced 2025-08-04 12:18:19 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 7

Merge remote-tracking branch 'origin/main' into remove-nat

Browse source
This commit is contained in:
Richard Feldman 2024-02-11 12:26:36 -05:00
commit 24a38c4a26
No known key found for this signature in database
GPG key ID: F1F21AA5B1D9E43B
99 changed files with 2636 additions and 938 deletions
Download patch file Download diff file Expand all files Collapse all files

11
crates/compiler/test_mono/generated/issue_5513.txt Normal file
View file

@ -0,0 +1,11 @@
procedure Test.1 (Test.2):
let Test.7 : I64 = StructAtIndex 1 Test.2;
let Test.5 : {I64, I64} = Struct {Test.7, Test.7};
ret Test.5;
procedure Test.0 ():
let Test.8 : I64 = 0i64;
let Test.9 : I64 = 0i64;
let Test.4 : {I64, I64} = Struct {Test.8, Test.9};
let Test.3 : {I64, I64} = CallByName Test.1 Test.4;
ret Test.3;

37
crates/compiler/test_mono/generated/issue_6174.txt Normal file
View file

@ -0,0 +1,37 @@
procedure Bool.1 ():
let Bool.23 : Int1 = false;
ret Bool.23;
procedure Test.2 (Test.11, Test.1):
if Test.1 then
let Test.29 : I64 = 0i64;
let Test.28 : [C {}, C I64] = TagId(1) Test.29;
ret Test.28;
else
let Test.27 : {} = Struct {};
let Test.26 : [C {}, C I64] = TagId(0) Test.27;
ret Test.26;
procedure Test.3 (Test.12, Test.1):
if Test.1 then
let Test.23 : I64 = 0i64;
let Test.22 : [C {}, C I64] = TagId(1) Test.23;
ret Test.22;
else
let Test.21 : {} = Struct {};
let Test.20 : [C {}, C I64] = TagId(0) Test.21;
ret Test.20;
procedure Test.4 (Test.13, Test.1):
let Test.25 : {} = Struct {};
let Test.17 : [C {}, C I64] = CallByName Test.2 Test.25 Test.1;
let Test.19 : {} = Struct {};
let Test.18 : [C {}, C I64] = CallByName Test.3 Test.19 Test.1;
let Test.16 : List [C {}, C I64] = Array [Test.17, Test.18];
ret Test.16;
procedure Test.0 ():
let Test.1 : Int1 = CallByName Bool.1;
let Test.15 : {} = Struct {};
let Test.14 : List [C {}, C I64] = CallByName Test.4 Test.15 Test.1;
ret Test.14;

10
crates/compiler/test_mono/generated/record_update.txt
View file

@ -27,15 +27,15 @@ procedure Num.22 (#Attr.2, #Attr.3):
procedure Test.1 (Test.2):
let Test.6 : List U64 = StructAtIndex 0 Test.2;
let Test.8 : List U64 = StructAtIndex 1 Test.2;
let Test.10 : List U64 = StructAtIndex 2 Test.2;
let Test.7 : List U64 = StructAtIndex 1 Test.2;
let Test.8 : List U64 = StructAtIndex 2 Test.2;
let Test.13 : U64 = 8i64;
let Test.14 : U64 = 8i64;
let Test.9 : List U64 = CallByName List.3 Test.8 Test.13 Test.14;
let Test.10 : List U64 = CallByName List.3 Test.7 Test.13 Test.14;
let Test.11 : U64 = 7i64;
let Test.12 : U64 = 7i64;
let Test.7 : List U64 = CallByName List.3 Test.6 Test.11 Test.12;
let Test.5 : {List U64, List U64, List U64} = Struct {Test.7, Test.9, Test.10};
let Test.9 : List U64 = CallByName List.3 Test.6 Test.11 Test.12;
let Test.5 : {List U64, List U64, List U64} = Struct {Test.9, Test.10, Test.8};
ret Test.5;
procedure Test.0 ():