lean4-htt/tests/compiler/StackOverflowTask.lean
2020-05-04 11:11:11 +02:00

3 lines
134 B
Text

partial def foo : Nat → Nat | n => foo n + 1
@[neverExtract]
def main : IO Unit := IO.println $ Task.get $ Task.mk $ fun _ => foo 0