Coccinelle release 0.2.5-rc8

[bpt/coccinelle.git] / ocaml / yes_prepare_ocamlcocci.ml

diff --git a/ocaml/yes_prepare_ocamlcocci.ml b/ocaml/yes_prepare_ocamlcocci.ml
index 8450580..2aa9529 100644 (file)
--- a/ocaml/yes_prepare_ocamlcocci.ml
+++ b/ocaml/yes_prepare_ocamlcocci.ml
@@ -82,6 +82,7 @@ let ast_rep_binding ctr = function
   | (Some nm,Ast.MetaExpListDecl _) -> print_match ctr nm "ExprList"
   | (Some nm,Ast.MetaDeclDecl _) -> print_match ctr nm "Decl"
   | (Some nm,Ast.MetaFieldDecl _) -> print_match ctr nm "Field"
+  | (Some nm,Ast.MetaFieldListDecl _) -> print_match ctr nm "FieldList"
   | (Some nm,Ast.MetaStmDecl _) -> print_match ctr nm "Stmt"
   | (Some nm,Ast.MetaStmListDecl _) -> failwith ("not supported: "^nm)
   | (Some nm,Ast.MetaFuncDecl _) -> print_match ctr nm "Str"