Js_of_ocaml_compiler.Freevarsval iter_block_free_vars : ( Code.Var.t -> unit ) -> Code.block -> unitval iter_block_bound_vars : ( Code.Var.t -> unit ) -> Code.block -> unitval f :
Code.program ->
Js_of_ocaml_compiler.Code.Var.Set.t Js_of_ocaml_compiler.Code.Addr.Map.t