lean4-htt/tests/compiler/StackOverflowTask.lean
Leonardo de Moura fa101444b4 chore: fix tests
2020-10-25 09:11:13 -07:00

4 lines
147 B
Text

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