Module Ppx_optcomp__.Token
module Directive : sig ... end
type 'a t
=
|
Block of 'a Base.list
blocks with no optcomp extensions in it
|
Directive of Directive.t * Ppxlib.location * Ppxlib.payload
val make_directive : string -> Ppxlib.location -> Ppxlib.payload -> 'a t
val just_directives_exn : loc:Ppxlib.Location.t -> 'a t Base.List.t -> 'b t Base.List.t