15 lines
377 B
Plaintext
15 lines
377 B
Plaintext
;; A fn with two arities in a running program: evaluating the fn form again
|
|
;; from the editor replaces its arities, and a call to each reaches the new
|
|
;; bodies.
|
|
import agent "vendor:agent"
|
|
|
|
fn area
|
|
(w: i32) -> i32 = w * w
|
|
(w: i32, h: i32) -> i32 = w * h
|
|
|
|
fn main() -> i32
|
|
agent/start("/tmp/flan-dev-versions-fallback.sock")
|
|
for i in range(4000)
|
|
agent/wait(5)
|
|
0
|