sig
  type t
  type 'a key
  val key :
    ?preprocess:('-> 'a) -> unit -> 'Ocsigen_server.Config_nested.key
  val find :
    Ocsigen_server.Config_nested.t ->
    'Ocsigen_server.Config_nested.key -> 'a option
  val set :
    Ocsigen_server.Config_nested.t ->
    'Ocsigen_server.Config_nested.key -> '-> unit
  val unset :
    Ocsigen_server.Config_nested.t ->
    'Ocsigen_server.Config_nested.key -> unit
  type accessor = {
    accessor : 'a. 'Ocsigen_server.Config_nested.key -> 'a option;
  }
end