type visitor_in = {kexpr : ((Cst_php.expr -> unit) * visitor_out) -> Cst_php.expr -> unit;kstmt : ((Cst_php.stmt -> unit) * visitor_out) -> Cst_php.stmt -> unit;ktop : ((Cst_php.toplevel -> unit) * visitor_out) -> Cst_php.toplevel -> unit;kconstant : ((Cst_php.constant -> unit) * visitor_out) ->
Cst_php.constant ->
unit;kscalar : ((Cst_php.scalar -> unit) * visitor_out) -> Cst_php.scalar -> unit;kencaps : ((Cst_php.encaps -> unit) * visitor_out) -> Cst_php.encaps -> unit;kclass_stmt : ((Cst_php.class_stmt -> unit) * visitor_out) ->
Cst_php.class_stmt ->
unit;kparameter : ((Cst_php.parameter -> unit) * visitor_out) ->
Cst_php.parameter ->
unit;kargument : ((Cst_php.argument -> unit) * visitor_out) ->
Cst_php.argument ->
unit;kcatch : ((Cst_php.catch -> unit) * visitor_out) -> Cst_php.catch -> unit;kfinally : ((Cst_php.finally -> unit) * visitor_out) ->
Cst_php.finally ->
unit;kxhp_html : ((Cst_php.xhp_html -> unit) * visitor_out) ->
Cst_php.xhp_html ->
unit;kxhp_tag : ((Cst_php.xhp_tag Cst_php.wrap -> unit) * visitor_out) ->
Cst_php.xhp_tag Cst_php.wrap ->
unit;kxhp_attribute : ((Cst_php.xhp_attribute -> unit) * visitor_out) ->
Cst_php.xhp_attribute ->
unit;kxhp_attr_decl : ((Cst_php.xhp_attribute_decl -> unit) * visitor_out) ->
Cst_php.xhp_attribute_decl ->
unit;kxhp_children_decl : ((Cst_php.xhp_children_decl -> unit) * visitor_out) ->
Cst_php.xhp_children_decl ->
unit;kfunc_def : ((Cst_php.func_def -> unit) * visitor_out) ->
Cst_php.func_def ->
unit;kclass_def : ((Cst_php.class_def -> unit) * visitor_out) ->
Cst_php.class_def ->
unit;kmethod_def : ((Cst_php.method_def -> unit) * visitor_out) ->
Cst_php.method_def ->
unit;kstmt_and_def_list_scope : ((Cst_php.stmt_and_def list -> unit) * visitor_out) ->
Cst_php.stmt_and_def list ->
unit;kname : ((Cst_php.name -> unit) * visitor_out) -> Cst_php.name -> unit;khint_type : ((Cst_php.hint_type -> unit) * visitor_out) ->
Cst_php.hint_type ->
unit;ktparam : ((Cst_php.type_param -> unit) * visitor_out) ->
Cst_php.type_param ->
unit;karray_pair : ((Cst_php.array_pair -> unit) * visitor_out) ->
Cst_php.array_pair ->
unit;karguments : ((Cst_php.argument Cst_php.comma_list Cst_php.paren ->
unit)
* visitor_out) ->
Cst_php.argument Cst_php.comma_list Cst_php.paren ->
unit;kcomma : ((Cst_php.tok -> unit) * visitor_out) -> Cst_php.tok -> unit;kinfo : ((Cst_php.tok -> unit) * visitor_out) -> Cst_php.tok -> unit;}and visitor_out = Cst_php.any -> unitval default_visitor : visitor_inval mk_visitor : visitor_in -> visitor_outval do_visit_with_ref : ('a list ref -> visitor_in) -> Cst_php.any -> 'a list