opium_kernel

Sinatra like web toolkit based on Lwt + Cohttp
Library opium_kernel
val names : string list
val env : ( t, Opium_kernel__Hmap0.t ) Fieldslib.Field.t
val fold : init:'acc__0 -> request:( 'acc__0 -> ( t, Cohttp.Request.t ) Fieldslib.Field.t -> 'acc__1 ) -> body:( 'acc__1 -> ( t, Cohttp_lwt.Body.t ) Fieldslib.Field.t -> 'acc__2 ) -> env:( 'acc__2 -> ( t, Opium_kernel__Hmap0.t ) Fieldslib.Field.t -> 'acc__3 ) -> 'acc__3
val make_creator : request: ( ( t, Cohttp.Request.t ) Fieldslib.Field.t -> 'acc__0 -> ( 'input__ -> Cohttp.Request.t ) * 'acc__1 ) -> body: ( ( t, Cohttp_lwt.Body.t ) Fieldslib.Field.t -> 'acc__1 -> ( 'input__ -> Cohttp_lwt.Body.t ) * 'acc__2 ) -> env: ( ( t, Opium_kernel__Hmap0.t ) Fieldslib.Field.t -> 'acc__2 -> ( 'input__ -> Opium_kernel__Hmap0.t ) * 'acc__3 ) -> 'acc__0 -> ( 'input__ -> t ) * 'acc__3
val create : request:Cohttp.Request.t -> body:Cohttp_lwt.Body.t -> env:Opium_kernel__Hmap0.t -> t
val map : request:( ( t, Cohttp.Request.t ) Fieldslib.Field.t -> Cohttp.Request.t ) -> body:( ( t, Cohttp_lwt.Body.t ) Fieldslib.Field.t -> Cohttp_lwt.Body.t ) -> env: ( ( t, Opium_kernel__Hmap0.t ) Fieldslib.Field.t -> Opium_kernel__Hmap0.t ) -> t
val iter : request:( ( t, Cohttp.Request.t ) Fieldslib.Field.t -> unit ) -> body:( ( t, Cohttp_lwt.Body.t ) Fieldslib.Field.t -> unit ) -> env:( ( t, Opium_kernel__Hmap0.t ) Fieldslib.Field.t -> unit ) -> unit
val for_all : request:( ( t, Cohttp.Request.t ) Fieldslib.Field.t -> bool ) -> body:( ( t, Cohttp_lwt.Body.t ) Fieldslib.Field.t -> bool ) -> env:( ( t, Opium_kernel__Hmap0.t ) Fieldslib.Field.t -> bool ) -> bool
val exists : request:( ( t, Cohttp.Request.t ) Fieldslib.Field.t -> bool ) -> body:( ( t, Cohttp_lwt.Body.t ) Fieldslib.Field.t -> bool ) -> env:( ( t, Opium_kernel__Hmap0.t ) Fieldslib.Field.t -> bool ) -> bool
val to_list : request:( ( t, Cohttp.Request.t ) Fieldslib.Field.t -> 'elem__ ) -> body:( ( t, Cohttp_lwt.Body.t ) Fieldslib.Field.t -> 'elem__ ) -> env:( ( t, Opium_kernel__Hmap0.t ) Fieldslib.Field.t -> 'elem__ ) -> 'elem__ list
val map_poly : ( [< `Read | `Set_and_create ], t, 'x0 ) Fieldslib.Field.user -> 'x0 list
module Direct : sig ... end