13 lines
388 B
OCaml
13 lines
388 B
OCaml
(* Accessors for the table of toplevel value bindings. These functions
|
|
must appear as first and second exported functions in this module.
|
|
(See module Translmod.) *)
|
|
val getvalue : string -> Obj.t
|
|
|
|
val setvalue : string -> Obj.t -> unit
|
|
|
|
val print_toplevel_value_bindings : unit -> unit
|
|
|
|
type evalenv = Format.formatter -> string -> unit
|
|
|
|
val init : Format.formatter -> evalenv
|