type 'a reader
= Bin_prot.Common.buf ‑> pos_ref:Bin_prot.Common.pos_ref ‑> 'a
val read_option : [ `some | `none ] reader
val read_sequence : int reader
val read_polymorphic_variant : int reader
val read_usual_variant : int reader