module type AstFilters = sig
.. end
module Ast: Camlp4.Sig.Camlp4Ast
type 'a
filter = 'a -> 'a
val register_sig_item_filter : Camlp4.Sig.Ast.sig_item filter -> unit
val register_str_item_filter : Camlp4.Sig.Ast.str_item filter -> unit
val register_topphrase_filter : Camlp4.Sig.Ast.str_item filter -> unit
val fold_interf_filters : ('a -> Camlp4.Sig.Ast.sig_item filter -> 'a) ->
'a -> 'a
val fold_implem_filters : ('a -> Camlp4.Sig.Ast.str_item filter -> 'a) ->
'a -> 'a
val fold_topphrase_filters : ('a -> Camlp4.Sig.Ast.str_item filter -> 'a) ->
'a -> 'a