ktdeque.extracted
Sraw
ktdeque
type 'a t = Obj.t
type ('buf, 'chain) strct =
| Small of 'buf
| Big of 'buf * 'chain * 'buf
val ground : 'a -> 'b t
val small : 'buf -> 'a t
val big : ('buf * 'chain * 'buf) -> 'a t
val case_struct : ('b -> 'c) -> ('d -> 'e -> 'f -> 'c) -> 'a t -> 'c