lean4-htt/tests/compiler/534.lean
Leonardo de Moura 2018dc0959 fix: disable panic messages during initialization
This is a temporary workaround until we implement #467.
Fixes #534
2021-06-29 14:48:48 -07:00

12 lines
252 B
Text

def foo (array : Array Nat) : Nat -> Nat
| 0 => 0
| n + 1 =>
let array := array.filter (!.==5)
if array.isEmpty then
0
else
let arrayOfLast := #[array.back]
foo arrayOfLast n
def main : IO Unit :=
IO.println ("hi")