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

Module type Eliom_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, Eliom_service.non_ext,
   Eliom_service.reg, [< `WithSuffix | `WithoutSuffix ], 'e, 'f,
   'a return)
   Eliom_service.t ->
  ?error_handler:((string * exn) list ->
   'a page Lwt.t) ->
  ('get -> 'post -> 'a page Lwt.t) ->
  unit