8b28467655
This PR improves the detection of situations where we branch multiple times on the same value in the code generator. Previously this would only consider repeated branching on function arguments, now on arbitrary values. Closes: #11018
22 lines
536 B
Text
22 lines
536 B
Text
/--
|
|
trace: [Compiler.saveMono] size: 6
|
|
def foo f x : Option Nat :=
|
|
let _x.1 := f x;
|
|
cases _x.1 : Option Nat
|
|
| Option.none =>
|
|
return _x.1
|
|
| Option.some val.2 =>
|
|
let _x.3 := Nat.add val.2 val.2;
|
|
let _x.4 := some ◾ _x.3;
|
|
return _x.4
|
|
-/
|
|
#guard_msgs in
|
|
set_option trace.Compiler.saveMono true in
|
|
def foo (f : Nat → Option Nat) (x : Nat) : Option Nat :=
|
|
if let some val := f x then
|
|
if let some val2 := f x then
|
|
some <| val + val2
|
|
else
|
|
none
|
|
else
|
|
none
|