language-servers/roc
1
0
Fork 0
mirror of https://github.com/roc-lang/roc.git synced 2025-09-29 23:04:49 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 7

use GetTagId in one more place

Browse source
This commit is contained in:
Folkert 2021-06-20 21:05:02 +02:00
parent aecb509909
commit 454241a04f
3 changed files with 8 additions and 53 deletions
Download patch file Download diff file Expand all files Collapse all files

8
compiler/mono/src/decision_tree.rs
View file

@ -1746,7 +1746,7 @@ fn decide_to_branching<'a>(
// We have learned more about the exact layout of the cond (based on the path)
// but tests are still relative to the original cond symbol
let mut switch = if let Layout::Union(_) = inner_cond_layout {
let mut switch = if let Layout::Union(union_layout) = inner_cond_layout {
let tag_id_symbol = env.unique_symbol();
let temp = Stmt::Switch {
@ -1757,11 +1757,9 @@ fn decide_to_branching<'a>(
ret_layout,
};
let expr = Expr::AccessAtIndex {
index: 0,
field_layouts: &[Layout::TAG_SIZE],
let expr = Expr::GetTagId {
structure: inner_cond_symbol,
wrapped: Wrapped::MultiTagUnion,
union_layout,
};
Stmt::Let(tag_id_symbol, expr, Layout::TAG_SIZE, env.arena.alloc(temp))