17 lines
280 B
Plaintext
17 lines
280 B
Plaintext
(module main)
|
|
|
|
(fn add_local ((a i32)) -> i32
|
|
(let one i32 1)
|
|
(var total i32 (+ a one))
|
|
(set total (+ total 1))
|
|
total)
|
|
|
|
(test "locals work"
|
|
(let base i32 2)
|
|
(var value i32 (add_local base))
|
|
(set value (+ value 1))
|
|
(= value 5))
|
|
|
|
(fn main () -> i32
|
|
(add_local 2))
|