mirror of
https://github.com/roc-lang/roc.git
synced 2025-08-04 04:08:19 +00:00
81 lines
2.9 KiB
Text
Generated
81 lines
2.9 KiB
Text
Generated
procedure Bool.1 ():
|
|
let Bool.24 : Int1 = false;
|
|
ret Bool.24;
|
|
|
|
procedure Test.1 (Test.4):
|
|
let Test.9 : I64 = 0i64;
|
|
ret Test.9;
|
|
|
|
procedure Test.0 ():
|
|
joinpoint Test.7 Test.2:
|
|
ret Test.2;
|
|
in
|
|
let Test.6 : List List [] = Array [];
|
|
joinpoint Test.15:
|
|
let Test.11 : I64 = 2i64;
|
|
jump Test.7 Test.11;
|
|
in
|
|
joinpoint Test.13 Test.12:
|
|
let Test.8 : I64 = CallByName Test.1 Test.12;
|
|
dec Test.12;
|
|
jump Test.7 Test.8;
|
|
in
|
|
let Test.44 : U64 = lowlevel ListLenUsize Test.6;
|
|
let Test.45 : U64 = 1i64;
|
|
let Test.46 : Int1 = lowlevel Eq Test.44 Test.45;
|
|
if Test.46 then
|
|
let Test.39 : U64 = 0i64;
|
|
let Test.40 : List [] = lowlevel ListGetUnsafe Test.6 Test.39;
|
|
let Test.41 : U64 = lowlevel ListLenUsize Test.40;
|
|
let Test.42 : U64 = 1i64;
|
|
let Test.43 : Int1 = lowlevel Eq Test.41 Test.42;
|
|
if Test.43 then
|
|
let Test.24 : U64 = 0i64;
|
|
let Test.19 : List [] = lowlevel ListGetUnsafe Test.6 Test.24;
|
|
decref Test.6;
|
|
let Test.20 : U64 = 0i64;
|
|
let Test.21 : U64 = lowlevel ListLenU64 Test.19;
|
|
let Test.22 : U64 = lowlevel NumSub Test.21 Test.20;
|
|
let Test.23 : U64 = 0i64;
|
|
let Test.3 : List [] = lowlevel ListSublist Test.19 Test.23 Test.22;
|
|
joinpoint Test.17 Test.16:
|
|
if Test.16 then
|
|
jump Test.13 Test.3;
|
|
else
|
|
dec Test.3;
|
|
let Test.10 : I64 = 1i64;
|
|
jump Test.7 Test.10;
|
|
in
|
|
let Test.18 : Int1 = CallByName Bool.1;
|
|
jump Test.17 Test.18;
|
|
else
|
|
let Test.34 : U64 = 0i64;
|
|
let Test.35 : List [] = lowlevel ListGetUnsafe Test.6 Test.34;
|
|
let Test.36 : U64 = lowlevel ListLenUsize Test.35;
|
|
let Test.37 : U64 = 0i64;
|
|
let Test.38 : Int1 = lowlevel NumGte Test.36 Test.37;
|
|
if Test.38 then
|
|
let Test.33 : U64 = 0i64;
|
|
let Test.28 : List [] = lowlevel ListGetUnsafe Test.6 Test.33;
|
|
decref Test.6;
|
|
let Test.29 : U64 = 0i64;
|
|
let Test.30 : U64 = lowlevel ListLenU64 Test.28;
|
|
let Test.31 : U64 = lowlevel NumSub Test.30 Test.29;
|
|
let Test.32 : U64 = 0i64;
|
|
let Test.3 : List [] = lowlevel ListSublist Test.28 Test.32 Test.31;
|
|
joinpoint Test.26 Test.25:
|
|
if Test.25 then
|
|
jump Test.13 Test.3;
|
|
else
|
|
dec Test.3;
|
|
jump Test.15;
|
|
in
|
|
let Test.27 : Int1 = CallByName Bool.1;
|
|
jump Test.26 Test.27;
|
|
else
|
|
dec Test.40;
|
|
decref Test.6;
|
|
jump Test.15;
|
|
else
|
|
dec Test.6;
|
|
jump Test.15;
|