lean4-htt/tests/compiler/strictOrSimp.lean
Leonardo de Moura a5cf1ac5ae chore: fix tests
2019-11-26 18:07:13 -08:00

11 lines
211 B
Text

partial def spin : Nat → Bool
| n => spin (n)
@[inline] def C : Nat := 0
def f (b : Nat) :=
if strictOr (C == 0) (spin b) then "hello"
else "world"
def main (xs : List String) : IO Unit :=
IO.println (f 0)