sig

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