roc/crates/compiler/test_mono/generated/recursive_call_capturing_function.txt

30 lines
979 B
Text

procedure Num.19 (#Attr.2, #Attr.3):
let Num.257 : U32 = lowlevel NumAdd #Attr.2 #Attr.3;
ret Num.257;
procedure Test.1 (Test.2):
let Test.9 : U32 = 0i64;
let Test.18 : U32 = StructAtIndex 0 Test.19;
let Test.19 : {U32} = Struct {Test.2};
let Test.8 : U32 = CallByName Test.3 Test.9 Test.18;
ret Test.8;
procedure Test.3 (Test.21, Test.22):
joinpoint Test.10 Test.4 #Attr.12:
let Test.2 : U32 = StructAtIndex 0 Test.17;
let Test.17 : {U32} = Struct {#Attr.12};
let Test.15 : Int1 = true;
if Test.15 then
ret Test.4;
else
let Test.12 : U32 = CallByName Num.19 Test.4 Test.2;
let Test.13 : U32 = StructAtIndex 0 Test.14;
let Test.14 : {U32} = Struct {Test.2};
jump Test.10 Test.12 Test.13;
in
jump Test.10 Test.21 Test.22;
procedure Test.0 ():
let Test.7 : U32 = 6i64;
let Test.6 : U32 = CallByName Test.1 Test.7;
ret Test.6;