sig
  module type OldDynlink =
    sig
      val loadfile : string -> unit
      val allow_unsafe_modules : bool -> unit
      val init : unit -> unit
      val add_interfaces : string list -> string list -> unit
      val digest_interface : string -> string list -> Digest.t
    end
  val loadfile : string -> unit
  val allow_unsafe_modules : bool -> unit
  val init : unit -> unit
  val add_interfaces : string list -> string list -> unit
  val digest_interface : string -> string list -> Digest.t
  exception Unsupported_Feature of string
  val is_native : bool
  type linking_error =
      Undefined_global of string
    | Unavailable_primitive of string
    | Uninitialized_global of string
  type error =
      Not_a_bytecode_file of string
    | Inconsistent_import of string
    | Unavailable_unit of string
    | Unsafe_file
    | Linking_error of string * Dynlink_common_interface.linking_error
    | Corrupted_interface of string
    | File_not_found of string
    | Cannot_open_dll of string
    | Inconsistent_implementation of string
  exception Error of Dynlink_common_interface.error
  val error_message : Dynlink_common_interface.error -> string
end