scope_analysis: fix the handling of Lambda forms

2026-02-12 18:32:36 +03:00
parent 81dfc07867
commit 8d301a6fc2
1 changed files with 3 additions and 1 deletions
--- a/lib/compiler/scope_analysis.ml
+++ b/lib/compiler/scope_analysis.ml
@@ -87,7 +87,9 @@ let rec analyze tbl current = function
  | Set (sym, expr) ->
     let* inner = analyze tbl current expr in
     resolve_set tbl current sym inner
-  | Lambda (s, body) -> analyze tbl (s :: current) body
+  | Lambda (s, body) ->
+     let* body = (analyze tbl (s :: current) body) in
+     Ok (Lambda body)
  | Apply (f, e) ->
     let* f = analyze tbl current f in
     let* e = analyze tbl current e in