Module Visitor_cpp

type visitor_in = {
  1. kexpr : Ast_cpp.expression vin;
  2. kstmt : Ast_cpp.statement vin;
  3. kinit : Ast_cpp.initialiser vin;
  4. ktypeC : Ast_cpp.typeC vin;
  5. kclass_member : Ast_cpp.class_member vin;
  6. kfieldkind : Ast_cpp.fieldkind vin;
  7. kparameter : Ast_cpp.parameter vin;
  8. kcompound : Ast_cpp.compound vin;
  9. kclass_def : Ast_cpp.class_definition vin;
  10. kfunc_def : Ast_cpp.func_definition vin;
  11. kcpp : Ast_cpp.cpp_directive vin;
  12. kblock_decl : Ast_cpp.block_declaration vin;
  13. kdeclaration : Ast_cpp.declaration vin;
  14. ktoplevel : Ast_cpp.toplevel vin;
  15. kinfo : Ast_cpp.tok vin;
}
and visitor_out = Ast_cpp.any -> unit
and 'a vin = (('a -> unit) * visitor_out) -> 'a -> unit
val default_visitor : visitor_in
val mk_visitor : visitor_in -> visitor_out