Support unification of extension types with uninhabited branches

This commit is contained in:
Ayaz Hafiz 2022-09-19 10:32:39 -05:00
parent 8a42d60ca2
commit be853b65c5
No known key found for this signature in database
GPG key ID: 0E2A37416A25EF58
4 changed files with 83 additions and 9 deletions

View file

@ -0,0 +1,7 @@
procedure Test.0 ():
let Test.5 : Str = "abc";
let Test.1 : [C [], C Str] = TagId(1) Test.5;
let Test.3 : Str = UnionAtIndex (Id 1) (Index 0) Test.1;
inc Test.3;
dec Test.1;
ret Test.3;