Module Protocol_conv.Runtime

type (_, _, _) structure =
  1. | Cons : (string * ('t -> 'a)) * ('t, 'b, 'c) structure -> ('t, 'a -> 'b, 'c) structure
  2. | Nil : ('t, 'a, 'a) structure
val (^::) : (string * ('a -> 'b)) -> ('a, 'c, 'd) structure -> ('a, 'b -> 'c, 'd) structure
type 'a no_flags = 'a
module type Driver = sig ... end