package moonpool

  1. Overview
  2. Docs

Source file domain_.ml

1
2
3
4
5
6
7
8
9
10
11
[@@@ocaml.alert "-unstable"]

let recommended_number () = Domain.recommended_domain_count ()

type t = unit Domain.t

let get_id (self : t) : int = (Domain.get_id self :> int)
let spawn : _ -> t = Domain.spawn
let relax = Domain.cpu_relax
let join = Domain.join
let is_main_domain = Domain.is_main_domain