language-servers/roc
1
0
Fork 0
mirror of https://github.com/roc-lang/roc.git synced 2025-10-03 16:44:33 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 6

fix ui tests

Browse source
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
Download patch file Download diff file Expand all files Collapse all files

5
crates/compiler/alias_analysis/src/lib.rs
View file

@ -349,9 +349,8 @@ where
} }
match opt_level { match opt_level {
// OptLevel::Development | OptLevel::Normal => morphic_lib::solve_trivial(program), OptLevel::Development | OptLevel::Normal => morphic_lib::solve_trivial(program),
// OptLevel::Optimize | OptLevel::Size => morphic_lib::solve(program), OptLevel::Optimize | OptLevel::Size => morphic_lib::solve(program),
_ => morphic_lib::solve_trivial(program),
} }
} }

2
crates/compiler/uitest/tests/ability/specialize/inspect/opaque_automatic.txt
View file

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

2
crates/compiler/uitest/tests/ability/specialize/inspect/opaque_automatic_late.txt
View file

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

2
crates/compiler/uitest/tests/lambda_set/erased/multi_branch_capturing.txt
View file

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