mirror of
https://github.com/roc-lang/roc.git
synced 2025-11-18 19:31:26 +00:00
35 lines
1.1 KiB
Text
35 lines
1.1 KiB
Text
procedure List.2 (List.74, List.75):
|
|
let List.272 : U64 = CallByName List.6 List.74;
|
|
let List.268 : Int1 = CallByName Num.22 List.75 List.272;
|
|
if List.268 then
|
|
let List.270 : I64 = CallByName List.60 List.74 List.75;
|
|
let List.269 : [C {}, C I64] = TagId(1) List.270;
|
|
ret List.269;
|
|
else
|
|
let List.267 : {} = Struct {};
|
|
let List.266 : [C {}, C I64] = TagId(0) List.267;
|
|
ret List.266;
|
|
|
|
procedure List.6 (#Attr.2):
|
|
let List.275 : U64 = lowlevel ListLen #Attr.2;
|
|
ret List.275;
|
|
|
|
procedure List.60 (#Attr.2, #Attr.3):
|
|
let List.274 : I64 = lowlevel ListGetUnsafe #Attr.2 #Attr.3;
|
|
ret List.274;
|
|
|
|
procedure Num.22 (#Attr.2, #Attr.3):
|
|
let Num.188 : Int1 = lowlevel NumLt #Attr.2 #Attr.3;
|
|
ret Num.188;
|
|
|
|
procedure Test.1 (Test.2):
|
|
let Test.6 : List I64 = Array [1i64, 2i64, 3i64];
|
|
let Test.7 : U64 = 0i64;
|
|
let Test.5 : [C {}, C I64] = CallByName List.2 Test.6 Test.7;
|
|
dec Test.6;
|
|
ret Test.5;
|
|
|
|
procedure Test.0 ():
|
|
let Test.4 : {} = Struct {};
|
|
let Test.3 : [C {}, C I64] = CallByName Test.1 Test.4;
|
|
ret Test.3;
|