package async_kernel

  1. Overview
  2. Docs
Monadic concurrency library

Install

dune-project
 Dependency

Authors

Maintainers

Sources

async_kernel-v0.16.0.tar.gz
sha256=0eda59386235e967698834d71cb8924d7b466bc4fcbf26ae72797ad05ca6f8a9

doc/src/async_kernel/ivar.ml.html

Source file ivar.ml

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
open Core
module Deferred = Deferred0
include Ivar0

let read = Deferred.of_ivar
let fill_if_empty t v = if is_empty t then fill t v

include
  Binable.Of_binable1_without_uuid [@alert "-legacy"]
    (Option)
    (struct
      type nonrec 'a t = 'a t

      let to_binable t = peek t

      let of_binable = function
        | None -> create ()
        | Some a -> create_full a
      ;;
    end)