@@ -59,6 +59,8 @@ module Mutex : sig
59
59
val unlock : ?checked : bool -> t -> unit
60
60
(* * [unlock mutex] unlocks the mutex.
61
61
62
+ ℹ️ This operation is not cancelable.
63
+
62
64
@raise Sys_error if the mutex was locked by another fiber. If
63
65
[~checked:false] was specified for some previous operation on the mutex
64
66
the exception may or may not be raised. *)
@@ -128,6 +130,8 @@ module Semaphore : sig
128
130
val release : t -> unit
129
131
(* * [release semaphore] increments the count of the semaphore.
130
132
133
+ ℹ️ This operation is not cancelable.
134
+
131
135
@raise Sys_error in case the count would overflow. *)
132
136
133
137
val acquire : t -> unit
@@ -154,7 +158,9 @@ module Semaphore : sig
154
158
[initial] is [true] and count of [0] otherwise. *)
155
159
156
160
val release : t -> unit
157
- (* * [release semaphore] sets the count of the semaphore to [1]. *)
161
+ (* * [release semaphore] sets the count of the semaphore to [1].
162
+
163
+ ℹ️ This operation is not cancelable. *)
158
164
159
165
val acquire : t -> unit
160
166
(* * [acquire semaphore] waits until the count of the semaphore is [1] and
@@ -259,6 +265,8 @@ module Latch : sig
259
265
invalid_arg "zero count"
260
266
]}
261
267
268
+ ℹ️ This operation is not cancelable.
269
+
262
270
@raise Invalid_argument in case the count of the latch is zero. *)
263
271
264
272
val try_incr : t -> bool
@@ -309,7 +317,9 @@ module Ivar : sig
309
317
(* * [try_poison_at ivar exn bt] attempts to poison the incremental variable
310
318
with the specified exception and backtrace. Returns [true] on success and
311
319
[false] in case the variable had already been poisoned or assigned a
312
- value. *)
320
+ value.
321
+
322
+ ℹ️ This operation is not cancelable. *)
313
323
314
324
val try_poison : ?callstack : int -> 'a t -> exn -> bool
315
325
(* * [try_poison ivar exn] is equivalent to
@@ -364,7 +374,9 @@ module Stream : sig
364
374
val poison_at : 'a t -> exn -> Printexc .raw_backtrace -> unit
365
375
(* * [poison_at stream exn bt] marks the stream as poisoned at the current
366
376
position, which means that subsequent attempts to {!push} to the [stream]
367
- will raise the given exception with backtrace. *)
377
+ will raise the given exception with backtrace.
378
+
379
+ ℹ️ This operation is not cancelable. *)
368
380
369
381
val poison : ?callstack : int -> 'a t -> exn -> unit
370
382
(* * [poison stream exn] is equivalent to
0 commit comments