;; Arities taken away and given back in a running program: a caller of a
;; removed arity stops on StaleCall, and one compiled against it is compiled
;; again once the name has an arity its call checks against.
import agent "vendor:agent"

fn helper(a: i32) -> i32 = a + 1

let n: i32 = helper(4)

fn use1() -> i32 = helper(2)

fn main() -> i32
  agent/start("/tmp/flan-dev-arities-fallback.sock")
  for i in range(4000)
    agent/wait(5)
  0