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

update mono tests

Browse source
This commit is contained in:
Anton-4 2022-07-02 11:02:10 +02:00
parent b1b9a8dc0a
commit 80226143e0
No known key found for this signature in database
GPG key ID: C954D6E0F9C0ABFD
3 changed files with 50 additions and 50 deletions
Download patch file Download diff file Expand all files Collapse all files

36
crates/compiler/test_mono/generated/list_cannot_update_inplace.txt
View file

@ -1,27 +1,27 @@
procedure List.3 (List.75, List.76, List.77):
let List.165 : {List I64, I64} = CallByName List.57 List.75 List.76 List.77;
let List.164 : List I64 = StructAtIndex 0 List.165;
inc List.164;
dec List.165;
ret List.164;
procedure List.3 (List.76, List.77, List.78):
let List.167 : {List I64, I64} = CallByName List.57 List.76 List.77 List.78;
let List.166 : List I64 = StructAtIndex 0 List.167;
inc List.166;
dec List.167;
ret List.166;
procedure List.57 (List.72, List.73, List.74):
let List.171 : U64 = CallByName List.6 List.72;
let List.168 : Int1 = CallByName Num.22 List.73 List.171;
if List.168 then
let List.169 : {List I64, I64} = CallByName List.61 List.72 List.73 List.74;
ret List.169;
procedure List.57 (List.73, List.74, List.75):
let List.173 : U64 = CallByName List.6 List.73;
let List.170 : Int1 = CallByName Num.22 List.74 List.173;
if List.170 then
let List.171 : {List I64, I64} = CallByName List.61 List.73 List.74 List.75;
ret List.171;
else
let List.167 : {List I64, I64} = Struct {List.72, List.74};
ret List.167;
let List.169 : {List I64, I64} = Struct {List.73, List.75};
ret List.169;
procedure List.6 (#Attr.2):
let List.163 : U64 = lowlevel ListLen #Attr.2;
ret List.163;
let List.165 : U64 = lowlevel ListLen #Attr.2;
ret List.165;
procedure List.61 (#Attr.2, #Attr.3, #Attr.4):
let List.170 : {List I64, I64} = lowlevel ListReplaceUnsafe #Attr.2 #Attr.3 #Attr.4;
ret List.170;
let List.172 : {List I64, I64} = lowlevel ListReplaceUnsafe #Attr.2 #Attr.3 #Attr.4;
ret List.172;
procedure Num.19 (#Attr.2, #Attr.3):
let Num.273 : U64 = lowlevel NumAdd #Attr.2 #Attr.3;

28
crates/compiler/test_mono/generated/list_get.txt
View file

@ -1,22 +1,22 @@
procedure List.2 (List.66, List.67):
let List.168 : U64 = CallByName List.6 List.66;
let List.164 : Int1 = CallByName Num.22 List.67 List.168;
if List.164 then
let List.166 : I64 = CallByName List.60 List.66 List.67;
let List.165 : [C {}, C I64] = Ok List.166;
ret List.165;
procedure List.2 (List.67, List.68):
let List.170 : U64 = CallByName List.6 List.67;
let List.166 : Int1 = CallByName Num.22 List.68 List.170;
if List.166 then
let List.168 : I64 = CallByName List.60 List.67 List.68;
let List.167 : [C {}, C I64] = Ok List.168;
ret List.167;
else
let List.163 : {} = Struct {};
let List.162 : [C {}, C I64] = Err List.163;
ret List.162;
let List.165 : {} = Struct {};
let List.164 : [C {}, C I64] = Err List.165;
ret List.164;
procedure List.6 (#Attr.2):
let List.171 : U64 = lowlevel ListLen #Attr.2;
ret List.171;
let List.173 : U64 = lowlevel ListLen #Attr.2;
ret List.173;
procedure List.60 (#Attr.2, #Attr.3):
let List.170 : I64 = lowlevel ListGetUnsafe #Attr.2 #Attr.3;
ret List.170;
let List.172 : I64 = lowlevel ListGetUnsafe #Attr.2 #Attr.3;
ret List.172;
procedure Num.22 (#Attr.2, #Attr.3):
let Num.273 : Int1 = lowlevel NumLt #Attr.2 #Attr.3;

36
crates/compiler/test_mono/generated/list_pass_to_function.txt
View file

@ -1,27 +1,27 @@
procedure List.3 (List.75, List.76, List.77):
let List.163 : {List I64, I64} = CallByName List.57 List.75 List.76 List.77;
let List.162 : List I64 = StructAtIndex 0 List.163;
inc List.162;
dec List.163;
ret List.162;
procedure List.3 (List.76, List.77, List.78):
let List.165 : {List I64, I64} = CallByName List.57 List.76 List.77 List.78;
let List.164 : List I64 = StructAtIndex 0 List.165;
inc List.164;
dec List.165;
ret List.164;
procedure List.57 (List.72, List.73, List.74):
let List.169 : U64 = CallByName List.6 List.72;
let List.166 : Int1 = CallByName Num.22 List.73 List.169;
if List.166 then
let List.167 : {List I64, I64} = CallByName List.61 List.72 List.73 List.74;
ret List.167;
procedure List.57 (List.73, List.74, List.75):
let List.171 : U64 = CallByName List.6 List.73;
let List.168 : Int1 = CallByName Num.22 List.74 List.171;
if List.168 then
let List.169 : {List I64, I64} = CallByName List.61 List.73 List.74 List.75;
ret List.169;
else
let List.165 : {List I64, I64} = Struct {List.72, List.74};
ret List.165;
let List.167 : {List I64, I64} = Struct {List.73, List.75};
ret List.167;
procedure List.6 (#Attr.2):
let List.170 : U64 = lowlevel ListLen #Attr.2;
ret List.170;
let List.172 : U64 = lowlevel ListLen #Attr.2;
ret List.172;
procedure List.61 (#Attr.2, #Attr.3, #Attr.4):
let List.168 : {List I64, I64} = lowlevel ListReplaceUnsafe #Attr.2 #Attr.3 #Attr.4;
ret List.168;
let List.170 : {List I64, I64} = lowlevel ListReplaceUnsafe #Attr.2 #Attr.3 #Attr.4;
ret List.170;
procedure Num.22 (#Attr.2, #Attr.3):
let Num.273 : Int1 = lowlevel NumLt #Attr.2 #Attr.3;