permit multiline comments and strings in macros

[bpt/coccinelle.git] / parsing_c / visitor_c.mli

diff --git a/parsing_c/visitor_c.mli b/parsing_c/visitor_c.mli
index 72e7dd2..4499208 100644 (file)
--- a/parsing_c/visitor_c.mli
+++ b/parsing_c/visitor_c.mli
@@ -33,8 +33,12 @@ val vk_statement : visitor_c -> statement   -> unit
 val vk_statement_sequencable : visitor_c -> statement_sequencable -> unit
 val vk_type      : visitor_c -> fullType    -> unit
 val vk_decl      : visitor_c -> declaration -> unit
+val vk_decl_list : visitor_c -> declaration list -> unit
 val vk_onedecl   : visitor_c -> onedecl -> unit
 val vk_ini       : visitor_c -> initialiser -> unit
+val vk_ini_list  : visitor_c -> initialiser wrap2 list -> unit
+val vk_inis_splitted :
+    visitor_c -> (initialiser, il) Common.either list -> unit
 val vk_name      : visitor_c -> name -> unit
 val vk_def       : visitor_c -> definition  -> unit
 val vk_node      : visitor_c -> Control_flow_c.node -> unit
@@ -53,6 +57,9 @@ val vk_params_splitted :
 val vk_struct_field : visitor_c -> field -> unit
 val vk_struct_fields : visitor_c -> field list -> unit
 val vk_struct_fieldkinds : visitor_c -> fieldkind wrap list -> unit
+val vk_enum_fields : visitor_c -> enumType -> unit
+val vk_enum_fields_splitted :
+    visitor_c -> (oneEnumType, il) Common.either list -> unit
 
 val vk_cst : visitor_c -> ((constant, string) Common.either wrap) -> unit
 
@@ -95,17 +102,25 @@ val vk_statement_s : visitor_c_s -> statement -> statement
 val vk_statement_sequencable_s : visitor_c_s -> statement_sequencable -> statement_sequencable
 val vk_type_s : visitor_c_s -> fullType -> fullType
 val vk_decl_s : visitor_c_s -> declaration -> declaration
+val vk_decl_list_s : visitor_c_s -> declaration list -> declaration list
 val vk_ini_s : visitor_c_s -> initialiser -> initialiser
+
+val vk_inis_splitted_s :
+  visitor_c_s ->
+  (initialiser, il) Common.either list ->
+  (initialiser, il) Common.either list
+
 val vk_def_s : visitor_c_s -> definition -> definition
+val vk_name_s : visitor_c_s -> name -> name
 val vk_toplevel_s : visitor_c_s -> toplevel -> toplevel
 val vk_info_s : visitor_c_s -> info -> info
 val vk_ii_s : visitor_c_s -> info list -> info list
 val vk_node_s : visitor_c_s -> Control_flow_c.node -> Control_flow_c.node
 val vk_program_s  : visitor_c_s -> program -> program
 
-val vk_arguments_s :
-  visitor_c_s ->
-  argument wrap2 list -> argument wrap2 list
+val vk_arguments_s : visitor_c_s -> argument wrap2 list -> argument wrap2 list
+
+val vk_inis_s : visitor_c_s -> initialiser wrap2 list -> initialiser wrap2 list
 
 val vk_args_splitted_s :
   visitor_c_s ->
@@ -130,6 +145,10 @@ val vk_define_params_splitted_s :
   (string Ast_c.wrap, il) Common.either list ->
   (string Ast_c.wrap, il) Common.either list
 
+val vk_enum_fields_s : visitor_c_s -> enumType -> enumType
+val vk_enum_fields_splitted_s : visitor_c_s ->
+  (oneEnumType, il) Common.either list ->
+  (oneEnumType, il) Common.either list
 val vk_struct_field_s : visitor_c_s -> field -> field
 val vk_struct_fields_s : visitor_c_s -> field list -> field list