Warning: Reason support is experimental. We are looking for beta-tester and contributors.

Module type Registration_sigs.S_poly

module type S_poly = sig..end

type _ page
type options
type _ return
val register : 
  ?app:string ->
  ?scope:[< Eliom_common.scope ] ->
  ?options:options ->
  ?charset:string ->
  ?code:int ->
  ?content_type:string ->
  ?headers:Cohttp.Header.t ->
  ?secure_session:bool ->
  service:('get, 'post, 'b, 'c, 'd, Service.non_ext, Service.reg,
   [< `WithSuffix | `WithoutSuffix ], 'e, 'f,
   'a return)
   Service.t ->
  ?error_handler:((string * exn) list ->
   'a page Lwt.t) ->
  ('get -> 'post -> 'a page Lwt.t) -> unit