mirror of
https://github.com/roc-lang/roc.git
synced 2025-08-03 11:52:19 +00:00
update mono tests
This commit is contained in:
parent
65f80b61c6
commit
5f2c7c5b5e
3 changed files with 16 additions and 16 deletions
|
@ -39,17 +39,17 @@ procedure Num.22 (#Attr.2, #Attr.3):
|
|||
|
||||
procedure Str.27 (#Attr.2):
|
||||
let #Attr.3 : {I64, U8} = lowlevel StrToNum #Attr.2;
|
||||
let Str.72 : U8 = StructAtIndex 1 #Attr.3;
|
||||
let Str.73 : U8 = 0i64;
|
||||
let Str.69 : Int1 = lowlevel NumGt Str.72 Str.73;
|
||||
if Str.69 then
|
||||
let Str.71 : Int1 = false;
|
||||
let Str.70 : [C Int1, C I64] = Err Str.71;
|
||||
ret Str.70;
|
||||
let Str.154 : U8 = StructAtIndex 1 #Attr.3;
|
||||
let Str.155 : U8 = 0i64;
|
||||
let Str.151 : Int1 = lowlevel NumGt Str.154 Str.155;
|
||||
if Str.151 then
|
||||
let Str.153 : Int1 = false;
|
||||
let Str.152 : [C Int1, C I64] = Err Str.153;
|
||||
ret Str.152;
|
||||
else
|
||||
let Str.68 : I64 = StructAtIndex 0 #Attr.3;
|
||||
let Str.67 : [C Int1, C I64] = Ok Str.68;
|
||||
ret Str.67;
|
||||
let Str.150 : I64 = StructAtIndex 0 #Attr.3;
|
||||
let Str.149 : [C Int1, C I64] = Ok Str.150;
|
||||
ret Str.149;
|
||||
|
||||
procedure Test.0 ():
|
||||
let Test.4 : Int1 = true;
|
||||
|
|
|
@ -27,12 +27,12 @@ procedure Num.22 (#Attr.2, #Attr.3):
|
|||
ret Num.273;
|
||||
|
||||
procedure Str.16 (#Attr.2, #Attr.3):
|
||||
let Str.67 : Str = lowlevel StrRepeat #Attr.2 #Attr.3;
|
||||
ret Str.67;
|
||||
let Str.149 : Str = lowlevel StrRepeat #Attr.2 #Attr.3;
|
||||
ret Str.149;
|
||||
|
||||
procedure Str.3 (#Attr.2, #Attr.3):
|
||||
let Str.68 : Str = lowlevel StrConcat #Attr.2 #Attr.3;
|
||||
ret Str.68;
|
||||
let Str.150 : Str = lowlevel StrConcat #Attr.2 #Attr.3;
|
||||
ret Str.150;
|
||||
|
||||
procedure Test.1 ():
|
||||
let Test.21 : Str = "lllllllllllllllllllllooooooooooong";
|
||||
|
|
|
@ -29,8 +29,8 @@ procedure Num.22 (#Attr.2, #Attr.3):
|
|||
ret Num.273;
|
||||
|
||||
procedure Str.3 (#Attr.2, #Attr.3):
|
||||
let Str.68 : Str = lowlevel StrConcat #Attr.2 #Attr.3;
|
||||
ret Str.68;
|
||||
let Str.150 : Str = lowlevel StrConcat #Attr.2 #Attr.3;
|
||||
ret Str.150;
|
||||
|
||||
procedure Test.1 ():
|
||||
let Test.21 : Str = "lllllllllllllllllllllooooooooooong";
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue