lean4-htt/tests/compiler/StackOverflowTask.lean
2021-01-27 14:45:31 +01:00

3 lines
135 B
Text

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