a47eb31076
This PR removes the LCNF testing framework. Unfortunately it never got used much and porting it to the extended LCNF structure now would be a bit of effort that would ultimately be in vain.
19 lines
338 B
Text
19 lines
338 B
Text
import Lean
|
|
|
|
@[inline] def f (c b : Bool) (x : Nat) : Nat :=
|
|
if c && b then
|
|
x + 1
|
|
else
|
|
x + 2
|
|
|
|
/--
|
|
trace: [Compiler.result] size: 2
|
|
def g c : Nat :=
|
|
let _x.1 := 2;
|
|
let _x.2 := Nat.add c _x.1;
|
|
return _x.2
|
|
-/
|
|
#guard_msgs in
|
|
set_option trace.Compiler.result true in
|
|
def g (c : Nat) : Nat :=
|
|
f true false c
|