sig
  type key = Ctypes.c_object
  type data = Lang.lfun
  val get : key -> data
end