mirror of
https://github.com/ocaml-tracing/ocaml-trace.git
synced 2026-03-09 12:23:32 -04:00
14 lines
268 B
OCaml
14 lines
268 B
OCaml
(** A multi-producer, single-consumer queue (from picos) *)
|
|
|
|
type !'a t
|
|
|
|
val create : unit -> 'a t
|
|
val enqueue : 'a t -> 'a -> unit
|
|
|
|
exception Empty
|
|
|
|
val dequeue : 'a t -> 'a
|
|
(** @raise Empty if empty *)
|
|
|
|
val dequeue_all : 'a t -> 'a list
|
|
(** @raise Empty if empty *)
|