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

Module Lwt_main

module Lwt_main : sig..end

Main loop and event queue


This module controls the ``main-loop'' of Lwt.

val run : 'a Lwt.t -> 'a

run p calls the Lwt scheduler repeatedly until p resolves, and returns the value of p if it is fulfilled. If p is rejected with an exception, that exception is raised.

Every native or bytecode program that uses Lwt should always use this function for evaluating a promise at the top level (such as its main function or main loop), otherwise promises that depend on I/O operations will not be resolved.

Example:

let main () = Lwt_io.write_line Lwt_io.stdout "hello world"

let () = Lwt_main.run @@ main ()

When targeting JavaScript, Lwt_main.run is not available, but neither it's necessary since the JS environment automatically takes care of the I/O considerations.

Note that you should avoid using run inside threads

  • The calling threads will not resume before run returns.
  • Successive invocations of run are serialized: an invocation of run will not terminate before all subsequent invocations are terminated.

Note also that it is not safe to call run in a function registered with Pervasives.at_exit, use the Lwt_main.at_exit function of this module instead.

val yield : unit -> unit Lwt.t

yield () is a threads which suspends itself and then resumes as soon as possible and terminates.

module type Hooks = sig..end

Hook sequences.

module Enter_iter_hooks : Hookswith type 'return_value kind = 'return_value

Hooks, of type unit -> unit, that are called before each iteration of the Lwt main loop.

module Leave_iter_hooks : Hookswith type 'return_value kind = 'return_value

Hooks, of type unit -> unit, that are called after each iteration of the Lwt main loop.

module Exit_hooks : Hookswith type 'return_value kind = 'return_value Lwt.t

Promise-returning hooks, of type unit -> unit Lwt.t, that are called at process exit.

val enter_iter_hooks : (unit -> unit) Lwt_sequence.t

Deprecated.Use module Lwt_main.Enter_iter_hooks.

val leave_iter_hooks : (unit -> unit) Lwt_sequence.t

Deprecated.Use module Lwt_main.Leave_iter_hooks.

val exit_hooks : (unit -> unit Lwt.t) Lwt_sequence.t

Deprecated.Use module Lwt_main.Exit_hooks.

val at_exit : (unit -> unit Lwt.t) -> unit

Lwt_main.at_exit hook is the same as ignore (Lwt_main.Exit_hooks.add_first hook).