sig
  type shape =
    CamlinternalMod.shape =
      Function
    | Lazy
    | Class
    | Module of shape array
  val init_mod : string * int * int -> shape -> Obj.t
  val update_mod : shape -> Obj.t -> Obj.t -> unit
end