mirror of
https://github.com/roc-lang/roc.git
synced 2025-11-02 05:48:17 +00:00
Don't add path instructions for newtypes that decay into their args
This commit is contained in:
parent
52e15bd344
commit
1acb7e0748
5 changed files with 44 additions and 11 deletions
|
|
@ -0,0 +1,13 @@
|
|||
procedure Test.0 ():
|
||||
let Test.10 : Str = "err";
|
||||
let Test.9 : [C Str, C Str] = TagId(1) Test.10;
|
||||
joinpoint Test.8:
|
||||
let Test.4 : Str = UnionAtIndex (Id 0) (Index 0) Test.9;
|
||||
inc Test.4;
|
||||
dec Test.9;
|
||||
ret Test.4;
|
||||
in
|
||||
let Test.3 : Str = UnionAtIndex (Id 1) (Index 0) Test.9;
|
||||
inc Test.3;
|
||||
dec Test.9;
|
||||
ret Test.3;
|
||||
Loading…
Add table
Add a link
Reference in a new issue