nb_blocks:int ->
blank:(unit -> 'a) ->
object
val buffer : 'a array
val mutable read : int
val mutable state :
[< `Crashed | `Idle | `Running of Thread.t | `Tired > `Idle `Tired ]
val wait_c : Condition.t
val wait_m : Mutex.t
val mutable write : int
method sourcering_stop : unit
end