package async_interactive

You can search for identifiers within the package.

in-package search v0.2.0

async_interactive
- Library async_interactive
  - Async_interactive
    
    Choice
    
    Job
- Sources
  - async_interactive
    
    async_interactive.ml

Legend:
Page
Library
Module
Module type
Parameter
Class
Class type
Source

Module `Async_interactive.Job`

val run : 
  f:(unit -> 'a Async.Deferred.t) ->
  ('r, unit, string, 'a Async.Deferred.t) Core.format4 ->
  'r

This module allows you to have messages printed when you start and finish jobs without having a bad interaction in case of interleaved jobs run in parallel.

Example of code:

  Interactive.Job.run !"starting doing stuff A in process %{Pid}" pid
    ~f:(fun () -> do_stuff_A ())
  >>= fun () ->

Example of output:

1 process:

  starting doing stuff A in process 1234 ... done.

Multiple processes:

  starting doing stuff A in process 1234 ...
  starting doing stuff A in process 4321 ...
  all done.
  starting doing stuff A in process 5678 ... done.

package async_interactive

Module Async_interactive.Job

Module `Async_interactive.Job`