sig type 'a t = 'a Bin_prot.Type_class.writer = { size : 'a Size.sizer; write : 'a Write.writer; } val to_string : 'a Core_bin_prot.Writer.t -> 'a -> string end