In_main_thread.Make
Call a blocking ('a -> 'b) function in a ('a -> 'b Lwt.t) context
module Main : MAIN
type ('request, 'response) t
A function from 'request to 'response
val create : ( 'request -> 'response ) -> ( 'request, 'response ) t
val destroy : ( 'request, 'response ) t -> unit
val fn : ( 'request, 'response ) t -> 'request -> 'response Lwt.t
Apply the function