roc/compiler/test_mono/generated/when_on_result.txt
2021-06-27 14:39:28 +02:00

27 lines
743 B
Text

procedure Test.1 (Test.5):
let Test.19 = 2i64;
let Test.2 = Ok Test.19;
joinpoint Test.9 Test.3:
ret Test.3;
in
let Test.16 = 1i64;
let Test.17 = GetTagId Test.2;
let Test.18 = lowlevel Eq Test.16 Test.17;
if Test.18 then
let Test.13 = UnionAtIndex (Id 1) (Index 0) Test.2;
let Test.14 = 3i64;
let Test.15 = lowlevel Eq Test.14 Test.13;
if Test.15 then
let Test.10 = 1i64;
jump Test.9 Test.10;
else
let Test.11 = 2i64;
jump Test.9 Test.11;
else
let Test.12 = 3i64;
jump Test.9 Test.12;
procedure Test.0 ():
let Test.7 = Struct {};
let Test.6 = CallByName Test.1 Test.7;
ret Test.6;