Release coccinelle-0.1.9-rc1

[bpt/coccinelle.git] / parsing_cocci / iso_compile.ml

diff --git a/parsing_cocci/iso_compile.ml b/parsing_cocci/iso_compile.ml
index f9835c6..a04141b 100644 (file)
--- a/parsing_cocci/iso_compile.ml
+++ b/parsing_cocci/iso_compile.ml
@@ -21,6 +21,7 @@
 
 
 module V0 = Visitor_ast0
+module VT0 = Visitor_ast0_types
 module Ast0 = Ast0_cocci
 module Ast = Ast_cocci
 
@@ -38,7 +39,7 @@ let sequence_tokens =
   let donothing r k e = k e in
   let bind x y = x @ y in
   let option_default = [] in
-  V0.combiner bind option_default
+  V0.flat_combiner bind option_default
     mcode mcode mcode mcode mcode mcode mcode mcode mcode mcode mcode mcode
     donothing donothing donothing donothing donothing donothing
     donothing donothing
@@ -100,5 +101,5 @@ let process_info l =
 
 let process (metavars,alts,name) =
   let toks =
-    List.map (List.map sequence_tokens.V0.combiner_anything) alts in
+    List.map (List.map sequence_tokens.VT0.combiner_rec_anything) alts in
   process_info toks