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