lean4-htt/tests/compiler/StackOverflowTask.lean
2022-10-19 09:28:08 -07:00

3 lines
136 B
Text

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