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