type 'a t = 'a Ppx_optcomp__.Token.t Base.list
val of_items : 'a Base.list -> of_item:('a -> 'a Ppx_optcomp__.Token.t) -> 'a t