sig
  type key
  type data
  val name : string
  val compile : WpContext.Data.key -> WpContext.Data.data
end