X-Git-Url: http://git.hcoop.net/bpt/coccinelle.git/blobdiff_plain/97111a47d707638a835d7498276ac6768a052ee8..17ba07880e1838028b4516ba7a2db2147b3aa1c9:/parsing_c/type_c.ml

diff --git a/parsing_c/type_c.ml b/parsing_c/type_c.ml
index 250b18e..7acaf6b 100644
--- a/parsing_c/type_c.ml
+++ b/parsing_c/type_c.ml
@@ -243,7 +243,7 @@ let type_of_decl decl =
           (* TODO normalize ? what if nested structure definition ? *)
           v_type
       )
-  | Ast_c.MacroDecl _ ->
+  | Ast_c.MacroDecl _ | Ast_c.MacroDeclInit _ ->
       pr2_once "not handling MacroDecl type yet";
       raise Todo
 
@@ -268,7 +268,7 @@ let structdef_of_decl decl =
           | _ -> raise Impossible
           )
       )
-  | Ast_c.MacroDecl _ -> raise Impossible
+  | Ast_c.MacroDecl _ | Ast_c.MacroDeclInit _ -> raise Impossible