sig
  type unwrap_id
  val id_of_int : int -> Eliom_unwrap.unwrap_id
  val register_unwrapper : Eliom_unwrap.unwrap_id -> ('-> 'b) -> unit
  val unwrap_js_var : string -> 'a
  val unwrap : string -> int -> 'a
  val register_unwrapper' :
    Eliom_unwrap.unwrap_id -> ('-> 'b option) -> unit
  val late_unwrap_value :
    Eliom_unwrap.unwrap_id -> ('-> bool) -> '-> unit
  val remaining_values_for_late_unwrapping : unit -> int list
end