17 lines
443 B
Plaintext
17 lines
443 B
Plaintext
;; 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
|