sig
  val to_channel :
    'a Generic_core.Ty.T.ty ->
    Pervasives.out_channel -> 'a -> Marshal.extern_flags list -> unit
  val to_string :
    'a Generic_core.Ty.T.ty -> 'a -> Marshal.extern_flags list -> string
  val to_bytes :
    'a Generic_core.Ty.T.ty -> 'a -> Marshal.extern_flags list -> bytes
  val from_channel : 'a Generic_core.Ty.T.ty -> Pervasives.in_channel -> 'a
  val from_string : 'a Generic_core.Ty.T.ty -> string -> int -> 'a
  val from_bytes : 'a Generic_core.Ty.T.ty -> bytes -> int -> 'a
  val to_repr : 'a Generic_core.Ty.T.ty -> 'a -> Obj.t
  val from_repr : 'a Generic_core.Ty.T.ty -> Obj.t -> 'a
end