mirror of
https://github.com/roc-lang/roc.git
synced 2025-07-28 17:03:44 +00:00
27 lines
857 B
Text
27 lines
857 B
Text
procedure Num.19 (#Attr.2, #Attr.3):
|
|
let Num.275 : I64 = lowlevel NumAdd #Attr.2 #Attr.3;
|
|
ret Num.275;
|
|
|
|
procedure Num.20 (#Attr.2, #Attr.3):
|
|
let Num.276 : I64 = lowlevel NumSub #Attr.2 #Attr.3;
|
|
ret Num.276;
|
|
|
|
procedure Test.1 (Test.15, Test.16):
|
|
joinpoint Test.7 Test.2 Test.3:
|
|
let Test.13 : I64 = 0i64;
|
|
let Test.14 : Int1 = lowlevel Eq Test.13 Test.2;
|
|
if Test.14 then
|
|
ret Test.3;
|
|
else
|
|
let Test.12 : I64 = 1i64;
|
|
let Test.10 : I64 = CallByName Num.20 Test.2 Test.12;
|
|
let Test.11 : I64 = CallByName Num.19 Test.2 Test.3;
|
|
jump Test.7 Test.10 Test.11;
|
|
in
|
|
jump Test.7 Test.15 Test.16;
|
|
|
|
procedure Test.0 ():
|
|
let Test.5 : I64 = 1000000i64;
|
|
let Test.6 : I64 = 0i64;
|
|
let Test.4 : I64 = CallByName Test.1 Test.5 Test.6;
|
|
ret Test.4;
|