fix ui tests

This commit is contained in:
Folkert 2024-06-28 17:10:22 +02:00
parent 047779d981
commit 9c0408b28e
No known key found for this signature in database
GPG key ID: 1F17F6FFD112B97C
4 changed files with 5 additions and 6 deletions

View file

@ -11,6 +11,7 @@ main =
procedure Inspect.248 (Inspect.249):
let Inspect.313 : Str = "<opaque>";
let Inspect.312 : Str = CallByName Inspect.59 Inspect.249 Inspect.313;
dec Inspect.313;
ret Inspect.312;
procedure Inspect.30 (Inspect.143):
@ -39,7 +40,6 @@ procedure Inspect.5 (Inspect.146):
procedure Inspect.59 (Inspect.296, Inspect.292):
let Inspect.315 : Str = CallByName Str.3 Inspect.296 Inspect.292;
dec Inspect.292;
ret Inspect.315;
procedure Inspect.60 (Inspect.298):

View file

@ -14,6 +14,7 @@ main =
procedure Inspect.248 (Inspect.249):
let Inspect.313 : Str = "<opaque>";
let Inspect.312 : Str = CallByName Inspect.59 Inspect.249 Inspect.313;
dec Inspect.313;
ret Inspect.312;
procedure Inspect.30 (Inspect.143):
@ -42,7 +43,6 @@ procedure Inspect.5 (Inspect.146):
procedure Inspect.59 (Inspect.296, Inspect.292):
let Inspect.315 : Str = CallByName Str.3 Inspect.296 Inspect.292;
dec Inspect.292;
ret Inspect.315;
procedure Inspect.60 (Inspect.298):

View file

@ -20,11 +20,11 @@ procedure Bool.2 ():
procedure Test.1 (Test.2):
let Test.34 : Int1 = CallByName Bool.2;
if Test.34 then
dec Test.2;
let Test.38 : FunPtr(({}) -> Str) = FunctionPointer Test.3;
let Test.35 : ?Erased = ErasedMake { value: <null>, callee: Test.38 };
ret Test.35;
else
inc Test.2;
let Test.33 : {Str} = Struct {Test.2};
let Test.31 : [<rnu><null>, C {Str}] = TagId(0) Test.33;
let Test.32 : FunPtr(({}, ?Erased) -> Str) = FunctionPointer Test.4;