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