Check in mono test case

This commit is contained in:
Ayaz Hafiz 2023-01-09 16:35:25 -06:00
parent b2688dd3b1
commit ba2527a020
No known key found for this signature in database
GPG key ID: 0E2A37416A25EF58

View file

@ -0,0 +1,29 @@
procedure Bool.11 (#Attr.2, #Attr.3):
let Bool.23 : Int1 = lowlevel Eq #Attr.2 #Attr.3;
ret Bool.23;
procedure Test.2 (Test.5):
let Test.14 : U8 = GetTagId Test.5;
switch Test.14:
case 2:
let Test.11 : Str = "a";
ret Test.11;
case 1:
let Test.12 : Str = "b";
ret Test.12;
default:
let Test.13 : Str = "c";
ret Test.13;
procedure Test.0 ():
let Test.10 : [<rnw><null>, C Str, C *self] = TagId(0) ;
let Test.8 : Str = CallByName Test.2 Test.10;
dec Test.10;
let Test.9 : Str = "c";
let Test.7 : Int1 = CallByName Bool.11 Test.8 Test.9;
dec Test.9;
dec Test.8;
ret Test.7;