Brummel
96db54d15d
Iteration-discipline milestone, 1 of 3. Adds named loop + recur as strictly-additive first-class AST nodes: parse/print/prose/serde/ round-trip/schema lockstep, typecheck (binder typing + recur arity/type unification via loop_stack threaded as mut.2's mut_scope_stack; recur-tail-position via verify_loop_body), codegen (loop-header + one phi per binder; recur back-edge br with a NEW parallel block_terminated setter; lambda-boundary loop_frames save/restore). Four Recur* CheckError variants. Strictly additive: zero deletions touch tail-app/tail-do or the seven existing block_terminated sites — this is what makes the destructive it.3 safe. recur synth = fresh metavar (resolves the plan's flagged Type::unit() risk). loop_counter->55, loop_in_lambda->49, four negatives fire, tail-app byte-identical, cargo test --workspace green. Specfda9b78, plan7381a42.
25 lines
897 B
Plaintext
25 lines
897 B
Plaintext
(module loop_in_lambda_e2e
|
|
|
|
(fn apply
|
|
(doc "apply a fn-of-Int to an Int")
|
|
(type (fn-type (params (fn-type (params (con Int)) (ret (con Int))) (con Int)) (ret (con Int))))
|
|
(params f x)
|
|
(body (app f x)))
|
|
|
|
(fn main
|
|
(doc "Iter it.1 — a loop inside a lambda body, invoked via a closure. The lambda computes x*x by summing x exactly x times through an accumulator loop; apply 7 prints 49. Codegen-soundness gate for the lambda-boundary loop_frames save/restore.")
|
|
(type (fn-type (params) (ret (con Unit)) (effects IO)))
|
|
(params)
|
|
(body
|
|
(app print
|
|
(app apply
|
|
(lam
|
|
(params (typed x (con Int)))
|
|
(ret (con Int))
|
|
(body
|
|
(loop ((var acc (con Int) 0) (var k (con Int) 0))
|
|
(if (app == k x)
|
|
acc
|
|
(recur (app + acc x) (app + k 1))))))
|
|
7)))))
|