`module Info : sig ... end`
`val get_approx : Info.t -> (Js_of_ocaml_compiler.Code.Var.Set.elt -> 'b) -> 'b -> ('b -> 'b -> 'b) -> Code.Var.Tbl.key -> 'b`
`val the_def_of : Info.t -> Code.prim_arg -> Code.expr option`
`val the_const_of : target:[ `JavaScript | `Wasm ] -> Info.t -> Code.prim_arg -> Code.constant option`
`val the_string_of : target:[ `JavaScript | `Wasm ] -> Info.t -> Code.prim_arg -> string option`
`val the_native_string_of : target:[ `JavaScript | `Wasm ] -> Info.t -> Code.prim_arg -> Code.Native_string.t option`
`val the_int : target:[ `JavaScript | `Wasm ] -> Info.t -> Code.prim_arg -> Targetint.t option`
`val f : ?skip_param:bool -> Code.program -> Code.program * Info.t`